Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
848to852
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
848to852
848to852
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

wie kann ich strin in rng variable ändern?

wie kann ich strin in rng variable ändern?
02.03.2007 12:13:00
Swen
Hallo an alle,
ich habe eine Frage.
Wenn ich in einem string folgendes drin stehen habe.
$B$4:$C$22 (dieses ist aber variabel) kann beim nächstenma
was anderes sein, es sind aber immer max. 2 spalten.
wie kann ich dann machen das er die erste spalte in die range variable
rngX legt und die 2 spalte in die rngY legt?
gruß
swen

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: wie kann ich strin in rng variable ändern?
ransi
HAllo
Suchst du Die Spaltennummern ?
Option Explicit


Public Sub test()
    Dim str As String
    Dim rngX As Integer
    Dim rngY As Integer
    str = "$B$4:$C$22"
    rngX = Range(str)(1).Column
    rngY = Range(str)(Range(str).Count).Column
    MsgBox rngX
    MsgBox rngY
End Sub


ransi
Anzeige
AW: wie kann ich strin in rng variable ändern?
02.03.2007 13:14:00
Swen
Hallo Ransi nein,
ich möchte gerne folgenden Range dan in den rngX und Y Varianten haben.
str = "$B$4:$C$22"
und rngX = soll dann "$B$4:$B$22" sein
und rngY = soll dann "$C$4:$C$22" sein
und wenn
str = "$Y$14:$Z$122"
und rngX = soll dann "$Y$14:$Y$122" sein
und rngY = soll dann "$Z$14:$Z$122" sein
gruß
swen
AW: wie kann ich strin in rng variable ändern?
02.03.2007 14:01:44
Rudi
Hallo,
mal universell:
Sub tt()
Dim str As String, rng As Range, rngX As Range, rngY As Range
str = "d4:h22"
Set rng = Range(str)
Set rngX = Range(Cells(rng.Row, rng.Column), Cells(rng.Row + rng.Rows.Count - 1, rng.Column))
Set rngY = Range(Cells(rng.Row, rng.Column + rng.Columns.Count - 1), Cells(rng.Row + rng.Rows.Count - _
1, rng.Column + rng.Columns.Count - _
1))
MsgBox rngX.Address & vbLf & rngY.Address
End Sub
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe
Anzeige
AW: wie kann ich strin in rng variable ändern?
02.03.2007 15:51:57
Swen
danke das klappt!
gruß
swen

299 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige