Clever-Excel-Forum

Normale Version: Variable in rows().select verwenden
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.

john_p

Guten Morgen,

es gibt ein (wahrscheinlich) kleines Problem, bei dem ich aber nicht weiter komme. Ich möchte per VBA ein paar Zeilen auswählen. Welche Zeilen das sein sollen (also von-bis) ist in zwei Variablen festgehalten.
Leider wird folgender Code nicht akzeptiert: 

Code:
Sub zeilenauswaehlen()
Dim activerow As Long
Dim targetrow As long
Dim ZeileMax As Long

activerow = Selection.Row
ZeileMax = Sheets("temp").UsedRange.Rows.Count
targetrow = activerow + ZeileMax


   Rows(activerow:targetrow).Select

   
End Sub

Das Hauptproblem ist wohl rows(activerow:targetrow). Problemlos akzeptiert wird rows("20:30"). Ich habe schon alle möglichen Syntaxvarianten probiert, leider erfolglos. 

Zusammenfassung: Statt rows("20:30") hätte ich gerne rows(activerow:targetrow). 

Ist das möglich?

Herzlichen Dank im voraus,
John
Hallo,

Code:
Rows(activerow & ":" & targetrow).Select

john_p

Vielen Dank!!
Hallo,

oder

Rows(activerow).Resize(ZeileMax).Select

Gruß Uwe
Wenn 2 Zellen selektiert sind:


Code:
Sub M_snb()
    Range(Selection.Areas(1), Selection.Areas(2)).EntireRow.Select
End Sub

Aber: verzichte au 'select' und 'Activate' in VBA

Wenn nur eine Zelle selektiert ist:

Code:
Sub M_snb()
    Range(Selection, Cells.SpecialCells(11)).EntireRow.Select
Endd Sub