Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema RefEdit
BildScreenshot zu RefEdit RefEdit-Seite mit Beispielarbeitsmappe aufrufen

Bereich mit "Cells" ansprechen

Betrifft: Bereich mit "Cells" ansprechen von: Harald S
Geschrieben am: 09.09.2004 09:21:52

Hallo liebe Gemeinde
hab mal wieder ein kleines Problem was für euch wahrscheinlich gar keines ist.

Ich möchte gerne einen gewissen Bereich ansprechen.

Derzeit Verwende ich den Code: z.B.
Range("A2",Range("A65536").end(xlup))

nun will ich aber die Spalte variabel ansprechen. und zwar folgendermassen:
in B1 gebe ich die Spaltennummer ein(z.B. 20) und in dieser Spalte soll sich nun der Bereich befinden.

hab folgendes probiert, aber ich komm mit dem Bereich definieren nicht zurecht.
sub datenansprechen

dim intspalte as integer
dim bereich as range
intspalte = Range("B1").value 'Spaltenzahl
set bereich = Cells(7,intspalte),?????????????????????????

nun fehlt mir der Teil,mit der ich die letzte ausgefüllte Zelle des Bereiches definiere??

könnt mir jemand mal nen guten Rat geben

DANKE
Harald

  


Betrifft: AW: Bereich mit "Cells" ansprechen von: GraFri
Geschrieben am: 09.09.2004 09:29:23

Hallo



Sub Bereich_ansprechen()
Dim x1  As Integer
Dim x2  As Integer
Dim y1  As Integer
Dim y2  As Integer

x1 = 1: y1 = 1
x2 = 5: y2 = 3

Range(Cells(y1, x1), Cells(y2, x2)).Select
End Sub


     Code eingefügt mit Syntaxhighlighter 2.5


Mit freundlichen Grüßen, GraFri


  


Betrifft: AW: Bereich mit "Cells" ansprechen von: Harald
Geschrieben am: 09.09.2004 09:45:07

Hallo GraFi

du hast mir nun den entscheidenden Hinweis gegeben.

ich hab den Fehler begangen, das ich beim ansprechen des Bereiches das "RANGE" vergessen habe.

jetzt brauch ich nur mehr schauen wie ich die letzte beschriebene Zelle eruiere und dann funzt des SUPER

Dank dir recht herzlich


Harald


  


Betrifft: AW: Bereich mit "Cells" ansprechen von: ypsilon
Geschrieben am: 09.09.2004 09:30:13

hi Harald
so vielleicht:

range(cells(erstezeile,erstespalte),cells(letztezeile,letztespalte))

cu Micha


 

Beiträge aus den Excel-Beispielen zum Thema "Bereich mit "Cells" ansprechen"