VBA-Forum - Das Forum zu Microsoft VBA

Ansicht des Beitrags:

Von: Sim_HF	Datum: 29.08.2016 18:15:27	Views: 596	Rating:	Antwort:
Thema: vlookup
Hallo nochmal. Code wie folgt angepasst. habe das range gelöscht: ThisWorkbook.Sheets("akte").Cells(lZeile, 2 + lsZeile) = Application.WorksheetFunction.VLookup(ThisWorkbook.Sheets("akte").Cells(1, 3), wks.Cells.Range("A1:F100"), 2, False) --------- So füllt er mir alle Zeilen in schleife aus, aber natürlich immer mit dem (1,3) suchkriterium. da es an die 40 überschriften gibt, die in den einzelnen Excel gesucht werden sollen, sollte das natürlich auch variabl direkt in der Schleife durchlaufen. Aber ich hab schon einiges ausprobiert und komme nicht weiter. glaube nicht, dass es so schwer ist, aber da ich sowas noch nie hatte, komm ich alleine nicht weiter. Hoffe ihr schon :P Danke!

Ihre Antwort

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema:		Name:		Email:

Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen