Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
680to684
680to684
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

erst Button 1 dann 2

Forumthread: erst Button 1 dann 2

erst Button 1 dann 2
17.10.2005 09:53:04
lexika
HI,
kann mir vielleicht jemand sagen ob es möglich ist einen Button erst aktiv zu schalten nachdem ein anderer gedrückt worden ist?
Danke
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: erst Button 1 dann 2
17.10.2005 09:57:07
MichaV
Hallo,
klar geht das:
Option Explicit
'Commandbutton1 muss zum Start die Eigenschaft Enabled=False haben.

Private Sub CommandButton1_Click()
CommandButton2.Enabled = True
End Sub

Gruss- Micha
PS: Rückmeldung wäre nett.
AW: erst Button 1 dann 2
17.10.2005 10:02:35
lexika
Hallo Micha,
kannst Du mir bitte sagen ob das so richtig ist?
Option Explicit

Private Sub CommandButton1_Click()
Call Sensor1
End Sub



Private Sub CommandButton2_Click()
CommandButton1.Enabled = True
Call Sensor1_alle
End Sub

Danke
Anzeige
AW: erst Button 1 dann 2
17.10.2005 10:04:29
MichaV
Hallo lexika,
ich weiß ja nicht, was Du vor hast ;o)
So wie Du es hier machst, ist es "erst Button 2, dann Button 1".
Gruss- Micha
PS: Rückmeldung wäre nett.
AW: erst Button 1 dann 2
17.10.2005 10:13:31
lexika
Hallo Micha,
habs jetzt gedreht zu
Option Explicit

Private Sub CommandButton1_Click()
CommandButton2.Enabled = True
Call Sensor1
End Sub



Private Sub CommandButton2_Click()
Call Sensor1_alle
End Sub

aber es will nicht.
es soll erst button eins einmal gedrückt worden sein bevor button 2 gedrückt werden kann.
Danke
Anzeige
AW: erst Button 1 dann 2
17.10.2005 10:18:03
MichaV
Hallo Lexika,
ich hab geschrieben "'Commandbutton1 muss zum Start die Eigenschaft Enabled=False haben" das ist Quatsch. Du musst vorher CommandButton2.Enabled=False einstellen.
Das machst Du in der Sub Workbook_Open oder manuell:
Entwurfsmodus einschalten, mit rechter Maustaste auf Button2, Eigenschaften, Enabled=False. Die Tasten- Beschriftung ist jetzt in Geisterschrift. Nun kannst Du den Entwurfsmodus beenden und die Taste wird erst nach klick auf Taste1 aktiviert.
Gruss- Micha
PS: Rückmeldung wäre nett.
Anzeige
Danke
17.10.2005 10:21:53
lexika
HI Micha,
besten Dank
Gruß
lexika
Bitte, Danke für Deine Rückmeldung. owT
18.10.2005 10:00:10
MichaV
;

Forumthreads zu verwandten Themen

1 Klick in Excel = Serienbrief (Word)
Marcus

Hallo zusammen,
ich habe da mal wieder ein kleines Problem!
Ich habe eine Exceltabelle mit Kundendaten. Diese muss ich in Einzelfällen anschreiben! Ich habe einen Worddokument, in dass ein paar Daten von einem Kunden eingetragen werden sollen.
Nun meine frage:
Gibt es eine Mögl...
03.09.2008 13:09:49
Thread-ID: 1007086
3 Beiträge
Anzeige
"Wenn Zeit > 17.30 Uhr dann"
Susanne99

Hallo,
wie formuliere und formatiere ich den o.g. Ausdruck als Formel?
Gruß
Susanne
14.09.2008 23:24:58
Thread-ID: 1009640
6 Beiträge
Kann =mid(A1,1,1) nicht mit SVERWEIS verbinden
maxx_1985

Hallo liebe Excelexperten,
mein Problem:
14000 ich mache daraus eine 1. Mit der Formel =(A1,1,1)
Diese 1 steht nun in B1. Jetzt moechte ich mich darauf beziehen und eine IF/THEN Formel einbauen. Excel macht das aber nicht. Nur wenn ich in B1 die 1 MANEULL reinschreibe, greift meine...
07.11.2008 18:46:00
Thread-ID: 1022785
5 Beiträge
VBA Code: wenn B1 <> blank, dann I in A1 schreiben
maxx_1985

Hi mit'nander
Braeuchte einen kleine Code dafuer:
wenn B1 blank, dann schreibe ein I in A1.
kann mir vielleicht jemand helfen? :-)
vielen vielen dank
denis
18.11.2008 16:27:16
Thread-ID: 1025694
5 Beiträge
select range if cellvalue =1
patrick

Hallo ich hab wieder eine frage an die excel und VBA profis:
ich möchte gerne ein makro dass mir einen bereich markiert wenn in einer bestimmten spalte ein bestimmter wert drin steht.
dh: zb:
wenn in einer zelle der spalte C85 eine "1" steht dann markiere den bereich B85:J85 oder w...
04.03.2009 11:16:37
Thread-ID: 1056258
5 Beiträge
ActiveSheet.CircleInvalid = null dann makro
Benjamin

hallo zusammen,
ich habe folgendes problem.
ich habe ein excel sheet mit mehren datenüberprüfungen versehen. Also z.B. in einer Spalte darf nur Datum grösser heute eingegeben werden, in einer anderen darf die maximale Textlänge 5 Zeichen nicht übertragen usw.
Das funktioniert auch g...
07.03.2009 17:23:28
Thread-ID: 1057716
6 Beiträge
select range if cellvalue =1
patrick

Hallo ich hab wieder eine frage an die excel und VBA profis:
ich möchte gerne ein makro dass mir einen bereich markiert wenn in einer bestimmten spalte ein bestimmter wert drin steht.
dh: zb:
wenn in einer zelle der spalte C85 eine "1" steht dann markiere den bereich B85:J85 oder we...
09.03.2009 15:47:00
Thread-ID: 1058202
13 Beiträge
Anzeige
Sortierung mit Kopfzeie trotz "Header:=x1Guess"
ROlf

Hallo Leutz,
Folgender Codeauschnitt:
Columns("A:AP").EntireColumn.AutoFit
'************************
'TABELLE SORTIEREN
'************************
If Hauptmenu.OptionButton4.Value = True Then
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("D2") _
09.04.2009 12:57:22
Thread-ID: 1067975
8 Beiträge
Anzeige
wenn Änderung Zellinhalt dann Macro
Joachim

Hallo,
ich hab 2 Tabellen (Eintrag und Statistik) und 2 Diagramme (Fehler und TelFax). Bei der Tabelle Statistik habe ich folgenden Code eingetragen:
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("D2:G30")) Is Nothing Then Call DiaFehlerFormat Call...
07.05.2009 14:02:59
Thread-ID: 1073604
12 Beiträge
Wert aus Zelle x in Zelle y, wenn Zelle Y =1
Wolfgang

Liebe Profis
In folgender Prozedur
Private Sub CommandButton1_Click() Range("A23:A37").Select Selection.TextToColumns Destination:=Range("A23"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=Fal...
08.05.2009 11:11:52
Thread-ID: 1073830
3 Beiträge
Werte von Zelle x übernehmen, wenn Zellwert=1
Zelle

Liebe Profis
In folgender Prozedur
Private Sub CommandButton1_Click() Range("A23:A37").Select Selection.TextToColumns Destination:=Range("A23"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=Fal...
11.05.2009 15:53:03
Thread-ID: 1074391
4 Beiträge
Wenn "Test" in I19:I23 dann Wert kopieren
Heinz

Guten morgen Leute
Habe ein Problem,deren Lösung ich nicht weiterkomme.
ZB. In Sheet "Zuschauer"A2 =WENN('R1'!$I19:$I23="Test";R1'!$j$19
In Sheet "Zuschauer" geht es bis 'R36' A2 - A3 - A4 usw. es geht um ein Diagramm für Zuschauer bei
HEIMSPIELEN.
Wenn zB. 'R3 "Test" i...
11.07.2009 10:40:54
Thread-ID: 1087834
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige