sverweis cells(i,1)

Forumthread: sverweis cells(i,1)

sverweis cells(i,1)

12.05.2005 14:16:50

artur

Hallo alle zusammen,
kleine Frage,
wie integriere ich die Cells(i,1) in den sverwesi,anstatt RC[-12]?


Sub Verweis()
For i = 1 To Range("A65536").End(xlUp).Row
If Cells(i, 1) <> Cells(i + 1, 1) Then
Cells(i, 13).FormulaR1C1 = "=VLOOKUP[RC-12],[Mitarbeiter.xls]Tabelle4!R1C1:R65536C7,7)"
Else
End If
Next i
End Sub

MFG
artur

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: sverweis cells(i,1)

12.05.2005 14:56:02

bavariabob
AW: sverweis cells(i,1)

12.05.2005 15:06:12

artur
AW: sverweis cells(i,1)

12.05.2005 15:11:22

bavariabob
AW: sverweis cells(i,1)

12.05.2005 15:01:40

u_
AW: sverweis cells(i,1)

12.05.2005 15:08:30

artur
AW: sverweis cells(i,1)

12.05.2005 16:21:32

u_
AW: sverweis cells(i,1)

12.05.2005 15:09:52

UweD
AW: sverweis cells(i,1)

12.05.2005 15:29:10

artur

AW: sverweis cells(i,1)

12.05.2005 14:56:02

bavariabob

Artur,
habe die Zellbezüge zum Testen geändert. Müsste aber verständlich sein
Gruss aus München!


Sub Verweis()
For i = 1 To Range("A6").End(xlUp).Row
If Cells(i, 1) <> Cells(i + 1, 1) Then
Cells(i, 13).Formula = Application.WorksheetFunction.VLookup(Cells(i, 1), Sheets(2).Range("a1:b5"), 2)
Else
End If
Next i
End Sub

AW: sverweis cells(i,1)

12.05.2005 15:06:12

artur

Hi bavariabob,
wollte es ausprobieren, jetzt akzeptiert es mein [Mitarbeiter.xls]Tabelle4'! nicht.
Hast du eine Ideee
mfg
artur

AW: sverweis cells(i,1)

12.05.2005 15:11:22

bavariabob

Artur,
du musst die richtige Datei "ansprechen". Z. B. :
Workbooks("Mitarbeiter").Sheets("Tabelle4").Range("a1").Select

AW: sverweis cells(i,1)

12.05.2005 15:01:40

Hallo,
am besten gar nicht!
Cells(i, 13).FormulaR1C1 = "=VLOOKUP(RC1,[Mitarbeiter.xls]Tabelle4!R1C1:R65536C7,7)"
Gruß
Geist ist geil!

AW: sverweis cells(i,1)

12.05.2005 15:08:30

artur

Hi u, warum gar nicht?
das mit den klammern war nur ein tippfehler.
mfg
artur

AW: sverweis cells(i,1)

12.05.2005 16:21:32

Hallo,
weil RC1 immer auf A in der gleichen Zeile verweist.
Gruß
Geist ist geil!

AW: sverweis cells(i,1)

12.05.2005 15:09:52

UweD

hallo Artur
so geht es auch:
Cells(i, 13).FormulaLocal = "=Sverweis(A" & i & ";[Mitarbeiter.xls]Tabelle4!A1:G65536;7)"
Gruß WweD

AW: sverweis cells(i,1)

12.05.2005 15:29:10

artur

Vielen dank an alle,
funktionert jetzt alles, wie ich wollte.
super!!
mfg
artur

Beliebteste Forumthreads (12 Monate)

Forumthread: sverweis cells(i,1)

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread