Makro Range

[Stromberg]

Ich schreibe gerade nen Makro und hab dabei ein Problem...

Habe aus Range ("B6").Select folgendes gemacht:

Dim i As Integer

i = 6

folglich wurde aus Range("B6").Select

Cells(i, 1).Select

aber wie wandel ich das um... Range("B6":"C6").Select ?

[Rumo]

Hi,

ist ungetestet aber es müsste so in der Art ausschauen

Dim Reihe As Long

Dim Spalte As Integer

Reihe = 'deine Reihe'

Spalte = 'deine Spalte'

Range(Cells(Reihe, Spalte), Cells(Reihe , iacCol + 'einem Offset')).Select[/PHP]

Lieben Gruß

Rumo

[gordonski]

kommt drauf an, was du vorhast würde ich sagen. Du könntest auch sowas machen:

cells(i,2).select

range(activecell, activecell.offset(0,1)).select

oder:

range(cells(i,2),cells(i,3)).select

es gibt viele Wege da hin zu kommen...

Gordonski

[Stromberg]

Vielen Dank! Funktioniert!

mfG Stromberg