Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
25.04.2024 12:55:42
Funktionsparameter auslesen
25.04.2024 11:49:37
Array verwenden
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1708to1712
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
1708to1712
1708to1712
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Excel Tabelle mit VBA erstellen und füllen

Excel Tabelle mit VBA erstellen und füllen
27.08.2019 14:27:50
Patricia
Hallo liebe Excel Profis,
Problem: Excel Tabelle mit VBA erstellen und füllen
ich habe mir für ein Uniprojekt (Maschinenbau) versucht etwas VBA beizubringen und komme langsam an meine Grenzen, hoffe ihr könnt mir Helfen:
Eingabe:
Anzahl der Pumpen: z.B. 2 (die Anzahl muss unbegrenzt bleiben)
Anzahl der Abschnitte: z.B. 3 (")
Ausgabe:
Pumpe 1
Abschnitte Länge
1__________(Manuele Eingabe)
2__________(")
3__________(")
Pumpe 2
Abschnitte Länge
1__________(Manuele Eingabe)
2__________(")
3__________(")
Vielen Dank
Patricia

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Excel Tabelle mit VBA erstellen und füllen
27.08.2019 16:57:13
mmat
Hallo Patricia
etwa so?
Sub pumpen()
Const anzahl = 3
Const abschnitte = 4
Dim n As Long, m As Long, r As Long
Workbooks.Add
r = 1
For n = 1 To anzahl
Cells(r, 1) = "Punpe" + Str(n)
r = r + 1
Cells(r, 1) = "Anschnitte"
Cells(r, 2) = "Länge"
r = r + 1
For m = 1 To abschnitte
Cells(r, 1) = CStr(m)
Cells(r, 2) = "Daten eingeben"
r = r + 1
Next
r = r + 1
Next
Cells(r, 1) = "Vielen Dank"
Cells(r + 1, 1) = "Patricia"
End Sub

AW: Excel Tabelle mit VBA erstellen und füllen
28.08.2019 08:28:59
Patricia
Vielen Dank mmat hat richtig gut funktioniert !
könntest du mir eventuell noch sagen wie ich die Anzahl über die Exceltabelle variieren kann z.B.
in G1 die Pumpen Anzahl und in G2 die Anzahl der Abschnitte eingeben kann, also ohne das Makro öffnen zu müssen ?
Besteht die Möglichkeit die Wörter Pumpe 1, Abschnitte und Länge in Dick zu schreiben ?
Anzeige
AW: Excel Tabelle mit VBA erstellen und füllen
28.08.2019 10:02:53
mmat
Hallo,
schreibe Anzahl in A1 und Abschnitte in A2 des Arbeitsblatts aus dem das Makro gestartet wird. 

Sub pumpen()
Dim Anzahl As Long, Abschnitte As Long
Dim n As Long, m As Long, r As Long
Anzahl = [a1]
Abschnitte = [a2]
Workbooks.Add
r = 1
For n = 1 To Anzahl
Cells(r, 1) = "Punpe" + Str(n): Cells(r, 1).Font.Bold = True
r = r + 1
Cells(r, 1) = "Anschnitte"
Cells(r, 2) = "Länge"
r = r + 1
For m = 1 To Abschnitte
Cells(r, 1) = CStr(m)
Cells(r, 2) = "Daten eingeben"
r = r + 1
Next
r = r + 1
Next
Cells(r, 1) = "Vielen Dank"
Cells(r + 1, 1) = "Patricia"
End Sub

Anzeige
AW: Excel Tabelle mit VBA erstellen und füllen
02.09.2019 11:36:54
Patricia
Wow danke ich hätte nicht gedacht das ich in dem Forum so schnelle und gute Antworten bekomme.
Könntest du mir noch bei einem Problem helfen?
Ich hab noch eine zusätzliche Spalte mit Material da soll jetzt allerdings nicht drunter stehen "Daten eingeben" sondern Dropdownlisten mit einer Auswahl die im Tabellenblatt 3 (in den Zeilen D3:D27) steht.
Wenn das jetzt zu kompliziert ist kann ich das gut verstehen.
Lg Patricia

279 Forumthreads zu ähnlichen Themen

Zahlen einer Tabelle in Userform einlesen
Josef

Guten Morgen!
Ich habe in einem Arbeitsblatt mehrere Tabellen.
In einer UserForm habe habe ich 460 TextBoxen, wobei die Zählung immer pro Reihe senkrecht erfolgt.
Spalte 1 = TextBox1-23, Spalte2 = TextBox24- TextBox46 usw.
Ich möchte nun z.B. die erste Tabelle in die Textboxen e...
20.08.2008 07:07:03
Thread-ID: 1003059
19 Beiträge
Anzeige
Inhalt einer Tabelle in 2. Tabelle kopieren
Thomas

Hallo Excel Gemeinde,
Den Inhalt einer Tabelle, möchte ich in eine zweite Tabelle in der gleichen Arbeitsmappe kopieren, das funktioniert schon mal.
Die zu kopierenden Daten sollen aber am Ende der bereits vorhandenen Daten angefügt werden, bisher überschreibt es mir diese aber ;-(
...
24.09.2008 22:19:00
Thread-ID: 1012186
3 Beiträge
Daten einer Tabelle in ein Blatt übertragen??
mfc_pj@bluewin.ch

Vielleicht kann mir jemand helfen. Ich habe eine ziemlich grosse Tabelle mit Kundendaten, Sachen wie Adresse, Tel. usw. Nun habe ich auch in Excel eine Karte erstellt mit Feldern wie Vorname, Name usw. um eine Kartei anzulegen. Nun möchte ich gerne die Daten der Liste in die Karte übertragen fü...
18.02.2009 14:24:00
Thread-ID: 1051812
4 Beiträge
Anzeige
Autovervollständigen aus einer Tabelle eines ander
Rockinger

Hallo,
ich hab folgendes Problem:
In meinem Verein gibt es ca. 100 Mitglieder, deren Namen ich in einer Excel-Tabelle eingetragen habe.
Zu einem Turnier kommen nun etliche Mitglieder und Gäste.
Für das Turnier habe ich eine Excel-Auswertung vorbereitet; in dieses Auswerteblatt m...
03.06.2009 13:43:52
Thread-ID: 1078711
2 Beiträge
Tabellenblätter autom. erstellen und ausfüllen
Robert

Hallo Leute
ich habe hier eine Mappe in der ich eine Vorlage für die Prüfung von Maschinen hab.
Ich brauch pro Maschine ein Tabellenblatt und daher würde ich diese gerne automatisch erstellen wenn in der Geräteliste ein Gerät eingetragen wird.
Des Weiteren soll in den automatisch er...
07.07.2009 20:30:38
Thread-ID: 1086950
7 Beiträge
Infos aus einer Tabelle in extra Mappe suchen
Kalle

Hallo zusammen,
ich hab noch nicht viel Ahnung von VB, deshalb es wäre absolut klasse wenn mir einer bei folgendem Problem helfen könnte:
Ich habe eine Tabelle in Mappe 2. In dieser Tabelle stehen zu einer Person verschiedene Daten z.B. Namen, Telefonnummern, Lieblingssportart usw.
...
19.08.2009 08:48:02
Thread-ID: 1096912
2 Beiträge
aus vielen einzelnen Tabellen in einer datei autom
Michael

Hallo zusammen,
wer kann mir helfen, ich möchte aus 175 tabellen in einer datei automatisch eine machen... geht das?
Danke Gruss
M.
05.11.2009 15:33:08
Thread-ID: 1114748
6 Beiträge
Erstellen einer weiteren Graphik aus Wertetabelle
Ganna

Hallo,
nachdem ich nach der Berechnung eine Wetetabelle bekomme und mit 1. und 2. Spalte eine Graphik erstelle, möchte ich nun einen weitern Graph aus dieser Tabelle als Zusatzdiagrammblatt mit 1. und 3. Spalte erstellen. Habe ein Teil noch mal kopiert und statt 2 die 3 geschrieben, sowie G...
12.11.2009 12:09:45
Thread-ID: 1116444
4 Beiträge
Anzeige

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
18
5
2
3
21
1
6
1
5
3
2
3
4
4
1
5
2
6
1
1
1
3
13
2
11