Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1328to1332
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1328to1332
1328to1332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Autofill via VBA

Autofill via VBA
08.09.2013 02:41:21
astis
Hallo,
solgende Ausgangssituation
in Tabellenblatt 1 werden im ersten Schritt Kundendaten importiert
in Tabellenblatt 2 sollen Verknüpfungen, der Anzahl der importieren Kunden nach,
erstellt werden. ( A1=Tabelle1!A1) etc.
Ich brauche somit eine Autofillfunktion die aus der Tabelle 1 erkennt, wieviele Datensäte vorhanden sind, und entsprechend den Autofillbereich in Tabelle 2 übernimmt.
Vielen lieben Dank an die / den der sich das mal ansehen kann...

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofill via VBA
08.09.2013 08:58:38
Thorsten_Z
Hallo astis,
Nicht elegant aber besser kann ich es nicht und es funktioniert.
Sub fuellen()
Dim zZeile As Long
zZeile = Worksheets("Tabelle1").Range("A65536").End(xlUp).Row
Sheets("Tabelle2").Select
Range("A1").Select
Sheets("Tabelle2").Range("A1").FormulaR1C1 = "=Tabelle1!RC"
Selection.AutoFill Destination:=Range("A1:A" & zZeile)
End Sub
Gruß
Thorsten

AW: Autofill via VBA
09.09.2013 06:42:48
haw
Hallo,
eine kürzere Variante: 
Sub Ausfüllen()
Dim lz&
lz = ThisWorkbook.Worksheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
ThisWorkbook.Worksheets("Tabelle2").Range("A1:A" & lz).FormulaR1C1 = "=Tabelle1!RC"
End Sub
Gruß
Heinz
Anzeige

105 Forumthreads zu ähnlichen Themen

Autofill per VBA
alex

Irgendwie bekomme ich das Autofill per VBA nicht hin.
Kann mir jemand helfen?
Sub test() With ThisWorkbook.Sheets(filename) loletzte4 = IIf(IsEmpty(.Cells(.Rows.Count, 6)), .Cells(.Rows.Count, 6).End(xlUp).Row, . _ Rows.Count) ThisWorkbook.Sheets(filename).Activate Range("f" & lolet...
25.11.2009 00:01:21
Thread-ID: 1119858
3 Beiträge
Anzeige
VBA Autofill mit dynamischen Bereich
Marcus

Hallo zusammen,
ich benötige erneut die Hilfe von euch Profis, da ich in diversen Foren keine Lösung für mein Problem gefunden habe und mit meinem Latein am Ende bin.
Ich habe eine recht große dynamische Excelliste mit teils umfangreichen bedingten Formatierungen. Per Schaltfläche möcht...
27.08.2015 16:55:25
Thread-ID: 1444757
4 Beiträge
VBA Autofill dynamisch gestalten
Marcus

Hallo zusammen,
meine letzte Frage wurde leider noch nicht geklärt und ich habe noch immer keine Lösung im Netz gefunden, deshalb versuche ich hier nochmal mein Glück.
Folgendes Problem: Ich habe eine Excelliste als Tabelle formatiert. Diese Tabelle hat zwangsläufig jede Menge Formatier...
03.09.2015 08:06:18
Thread-ID: 1445726
3 Beiträge
Anzeige
VBA Autofill -> Keine Rückmeldung
Rainer

Hallo zusammen,
der VBA-Linkshänder wieder mal.
Ich habe eine große Datei. Fast 300 Spalten mit verschiedenen Berechnungen, bis zu 5000 Zeilen tief. Nimmt eine Menge Speicherplatz.
Habe ich "rationalisiert", indem nur die erste Zeile überbleibt und der Rest über VBA mit Autofill e...
24.03.2017 10:43:53
Thread-ID: 1549228
14 Beiträge
VBA Autofill Schleife mit variablem Einfügebereich
Ed

Hallo Excel Freunde,
ich hoffe jemand kann mir bei folgendem Fall behilflich sein:
Ich erhalte regelmäßig eine Tabelle welche wie folgt aufgebaut ist:
A B C
1 Köln Innenstadt 50866
2 <...
29.05.2017 11:43:24
Thread-ID: 1560902
5 Beiträge
VBA Autofill Schleife mit variablem Einfügebereich
Ed

Hallo Excel Freunde,
ich hoffe jemand kann mir bei folgendem Fall behilflich sein:
Ich erhalte regelmäßig eine Tabelle welche wie folgt aufgebaut ist:
A B C
1 Köln Innenstadt 50866
2 <...
30.05.2017 08:17:17
Thread-ID: 1561046
2 Beiträge
VBA autofill bis 2 Zeilen vor letzter
Pascal

Hallo zusammen,
Ich hätte da eine Frage: Wie kann ich ein VBA bis 2 Zeilen vor der letzten beschrieben die autofill Funktion anwenden?
Ich kenne den Code der einschließlich die letzte beschriebene Zeile füllt.
Code:
Dim letzte As Long
letzte = Cells(Rows.Count, 4).End(xlUp)...
16.01.2018 07:00:44
Thread-ID: 1602447
4 Beiträge
Matrixformel und Autofill per VBA
Uwe

Hallo zusammen,
meine Herausforderung ist es in der Tabelle1 (Zelle G23) folgende Matrixformel mittels VBA einzutragen:
.Cells(23, 8).FormulaArray = IF(A23="","",SUM(IF((Tabelle3!$A$1:$A$10000=Tabelle1!A23)*(Tabelle3!$K$1:$K$10000=Tabelle1!$G$22),1)))
Dies funktioniert auch soweit.<...
07.08.2018 09:49:08
Thread-ID: 1637867
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
2
3
2
4
13
4
1
3
2
2
2
2
1
2
3
10
2
1
2
2
9
3
2
4