Variable in rows().select verwenden
#1
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
Top
#2
Hallo,

Code:
Rows(activerow & ":" & targetrow).Select
Gruß
Michael
[-] Folgende(r) 1 Nutzer sagt Danke an Der Steuerfuzzi für diesen Beitrag:
  •
Top
#3
Vielen Dank!!
Top
#4
Hallo,

oder

Rows(activerow).Resize(ZeileMax).Select

Gruß Uwe
Top
#5
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
Zum übersetzen von Excel Formeln:

http://dolf.trieschnigg.nl/excel/index.p...gids=en+de
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste