Macro teil variable machen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
Bild

Betrifft: Macro teil variable machen
von: Thomas
Geschrieben am: 26.10.2015 11:08:36

Hallo Excelfreunde
ich versuche gerade die constante SORTRANGEADDRESS variable zu machen.
Bestimmt ist dies ein Widerspruch aber der Macro teil ist nicht flexible.
Aus SORTRANGEADDRESS = "10:100" möchte ich irgendetwas mit
SORTRANGEADDRESS = "erstezeile:letzezeile" machen.
Die betroffenen Zeilennummern erstezeile und letzezeile habe ich schon
deklariert ( heist das so? ich finde die Zeilennummern schon).
Alternativ würde auch soetwas gehen Range(erstezeile:letzezeile)
Wie kann ich dies darstellen?
liebe grüsse thomas
Const SORTRANGEADDRESS = "10:100" ' von erste zeilbis letzte Zeile
Dim WKS As Worksheet

With ThisWorkbook
Set WKS = .Worksheets(strTabelle)

With WKS.Sort
.SortFields.Clear
.SortFields.Add Key:=WKS.Cells(lngUeberschriftRow, lngNameCol), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortTextAsNumbers
.SetRange Range(SORTRANGEADDRESS)
.Header = xlYes 'Überschriften JA (xlNo) /NEIN (xlGuess)
.Apply
End With

Bild

Betrifft: AW: Macro teil variable machen
von: Luschi
Geschrieben am: 26.10.2015 12:02:55
Hallo Thomas,
mach es so:
Dim ersteZeile As Long
Dim letzeZeile Long
ersteZeile = 9
letzeZeile = 999
SORTRANGEADDRESS = ersteZeile & ":" & letzeZeile
Gruß von Luschi
aus klein-Paris


Bild

Betrifft: AW: Macro teil variable machen
von: Thomas
Geschrieben am: 26.10.2015 12:48:34
Hallo Luschi,
vielen dank das Du Dir dies mal anschaust.
Leider bekomme ich den Fehler " Typen unverträglich"
Hast Du noch eine Idee?
liebe grüsse thomas

Bild

Betrifft: AW: Macro teil variable machen
von: Luschi
Geschrieben am: 26.10.2015 13:28:04
Hallo Thomas,
da fehlte jeweisl ein 'tt in letzte Zeile:


Sub test123()
    Dim ersteZeile As Long
    Dim letzteZeile As Long
    Dim SORTRANGEADDRESS As String
    
    ersteZeile = 9
    letzteZeile = 999
    SORTRANGEADDRESS = ersteZeile & ":" & letzteZeile
   
    MsgBox SORTRANGEADDRESS
End Sub
Gruß von Luschi
aus klein-Paris

Bild

Betrifft: besten dank an Luschi es passt super
von: Thomas
Geschrieben am: 26.10.2015 14:03:53
Hallo Luschi,
hab recht vielen dank. Es funktioniert super.
liebe grüsse thomas

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Macro teil variable machen"