Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
296to300
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
296to300
296to300
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Case Makro

Case Makro
20.08.2003 12:52:56
Harald
Hallo,
ich habe folgendes Makro, welches allerdings nur funzt, wenn ich irgendeine
Zelle mit ENTER oder EINGABE verlasse. Was muss ich wie ändern, damit es
ausgelöst wird, wenn durch Klick in ein Optionsfeld der Wert in M26 geändert wird?
Vielen Dank im Voraus.

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Range("M26").Value
Case 1:        Rows("1:10").RowHeight = 0
Case 2:        Rows("1:10").RowHeight = 20
End Select
End Sub

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Case Makro
20.08.2003 12:57:00
ChrisL
Hi Harald
Sub Makro()
Select Case Range("M26").Value

Case 1: Rows("1:10").RowHeight = 0
Case 2: Rows("1:10").RowHeight = 20
End Select
End Sub

Setz das Makro in ein normales Standardmodul und verbinde das Optionsfeld mit dem Makro.

Private Sub OptionButton1_Click()
Call Makro
End Sub

Gruss
Chris

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige