Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
Screenshot zu MsgBox	MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Wenn die aktive Zelle in letzter Zeile dann Makro | Herbers Excel-Forum

• Wenn die aktive Zelle in letzter Zeile dann Makro von Karsten vom 11.11.2009 14:49:14
• Aktive Zelle in letzter sichtbarer Zeile? - von Erich G. am 11.11.2009 15:07:54
  • AW: Aktive Zelle in letzter sichtbarer Zeile? - von Karsten am 11.11.2009 20:00:22

Betrifft: Wenn die aktive Zelle in letzter Zeile dann Makro von: Karsten
Geschrieben am: 11.11.2009 14:49:14

Hallo,

Kann mir jemand bei folgeden Befehl helfen:

Wenn die aktive Zelle in der letzten Zeile (also unten, über dem Tabellennamen) des sichtbaren Bereichs steht, soll Makro1 ausgeführt werden. Wenn nicht, dann weiter.

Danke für eure Hilfe.

Gruß
Karsten

Betrifft: Aktive Zelle in letzter sichtbarer Zeile? von: Erich G.
Geschrieben am: 11.11.2009 15:07:54

Hi Karsten,
probier mal

Sub aa()
   Dim rngVis As Range
   Set rngVis = Windows(1).VisibleRange
   If ActiveCell.Row = rngVis.Row + rngVis.Rows.Count - 1 Then
      MsgBox "Makro starten"
   End If
End Sub

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Betrifft: AW: Aktive Zelle in letzter sichtbarer Zeile? von: Karsten
Geschrieben am: 11.11.2009 20:00:22

Hallo Erich,

besten Dank. Genau das meinte ich.

Gruß
Karsten

Beiträge aus den Excel-Beispielen zum Thema "Wenn die aktive Zelle in letzter Zeile dann Makro"