Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1556to1560
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
1556to1560
1556to1560
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro in Tabelle 2 in nächster Zeile wiederholen

Makro in Tabelle 2 in nächster Zeile wiederholen
19.05.2017 10:43:07
Florian
Hallo miteinander,
in Tabellenblatt 1 sollten in der Zeile 3 die gewünschten Daten eingegeben werden.
Nach Klick auf den Button "Quittung" sollte es diese Daten korrekt im Tabellenblatt einfügen! Dies funktioniert! Mein Wunsch wäre nun dass wenn man eine neue "Daten" in Tabellenblatt 1 eingibt, es die Daten in der nächsten leeren Zeile (in diesem Fall A10)einfügt, die erste Buchung aber stehen bleibt.
Und dies sollte sich dann so fortsetzen.
Man gibt in Tabellenblatt 1 die Daten ein, klickt auf Quittung und es füllt die Daten in Tabellenblatt 2 automatisch in der nächsten leeren Zeile ein.
´
Vielleicht kann einer das Makro korrigieren oder ergänzen und es mir dann zukommen lassen. Vielen Dank
https://www.herber.de/bbs/user/113689.xlsm

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro in Tabelle 2 in nächster Zeile wiederholen
19.05.2017 11:49:44
Werner
Hallo Florian,
ich habe jetzt erst einmal nur deinen aufgezeichneten Code aufgeräumt. Teste die Datei mal, ob der Übertrag ins Blatt Quittung so passt.
Im Blatt Quittung, Bereich I8 bis I15 habe ich deine Verbundzellen wieder aufgelöst, die machen nur Probleme. Den gleichen optischen Effekt wie bei Verbundzellen kannst du erreichen indem du den Bereich H8 bis I15 markierst, Zellen formatieren, Ausrichtung, horizontal, über Auswahl zentrieren.
Die Daten werden im Moment ja schon aus dem Blatt Liste ins Blatt Quittung in zwei unterschiedliche Zeilen übertragen. Was ist, wenn im Blatt Quittung der Bereich bis Zeile 15 gefüllt ist? Muss dann der Bereich nach unten erweitert werden oder kann das nicht vorkommen?
Beantworte bitte die Fragen und schau dir die hochgeladene Datei an, ob es bis hierhin passt. Später kann ich dann weiter machen.
https://www.herber.de/bbs/user/113693.xlsm
Gruß Werner
Anzeige
Makro in Tabelle 2 in nächster Zeile wiederholen
19.05.2017 13:22:34
Florian
Vielen Dank! Ich dachte mir dass das eine oder andere nicht notwendig ist. Es kann sein das ein längerer Text vorkommt, aber da kann ich mit dem Zeilenumbruch arbeiten. Die Texte sollten nicht all zu lange sein.
Bzgl. Zeile 15, doch es kann sein das der Bereich erweitert werden muss! Ich werden im Laufe vom Tage immmer wieder so Soll Haben Buchungen mit zwei Zeilen hinzugefügt und am Ende vom Tag sollte man die Liste auf einem oder mehren A4 Blätter ausdrucken
AW: Makro in Tabelle 2 in nächster Zeile wiederholen
19.05.2017 19:26:59
Werner
Hallo Florian,
hier zum Testen:
https://www.herber.de/bbs/user/113697.xlsm
Gruß Werner
Anzeige
Makro in Tabelle 2 in nächster Zeile wiederholen
22.05.2017 10:06:08
Florian
Passt, genau so habe ich es mir vorgestellt. Vielen Dank
Gerne u. Danke für die Rückmeldung. o.w.T.
22.05.2017 10:17:51
Werner

316 Forumthreads zu ähnlichen Themen

VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
Anzeige
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Zelleninhalt mit VBA suchen
Tom

Hallo
zum Feierabend noch mal fix ne Frage
ich möchte in einem anderen sheet, in einer anderen Tabelle etwas suchen und danach 4 Zellen nach links gehen und den Wert kopieren...
Dim strActiveCell As String
Dim rFound As Range
Tabellenname = ActiveSheet.Name
Tabellenname...
04.09.2008 16:41:17
Thread-ID: 1007457
4 Beiträge
Anzeige
VBA heutiges Datum finden und Inhalt der Zelle prü
NeptunesChild

Hallo Leutz,
ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
06.11.2008 15:38:08
Thread-ID: 1022323
3 Beiträge
in farblich markierte Zelle springen
Maja

Hallo,
ich möchte in einem Excelblatt innerhalb eines bestimmten Zellbereichs diejenigen Zellen farblich anders markieren, die den Wert 0 aufweisen, die Namen dieser Zellen in einer MsgBox ausweisen und bei Klicken auf "OK" der MsgBox zur ersten der ausgegebenen markierten Zeile springen.
13.11.2008 15:11:05
Thread-ID: 1024246
6 Beiträge
Leere Zelle suchen, Wert eintragen VBA
andreas

Hallo zusammen,
habe ein kleines Formular mit zwei "Command-Button".
Bei drücken von "Zufügen" soll die nächst leere Zelle im Bereich "F3:J3500" gesucht werden und ein "x" eingetragen werden.
Bei drücken von "Entfernen" suche im selben Bereich die letzte ausgefüllte Zelle und diese...
19.11.2008 11:57:07
Thread-ID: 1025960
2 Beiträge
Per Makro zu einer bestimmten Zelle springen
Joachim

HI,
dank Eurer Hilfe weiss ich nun, wie ich meine Spalte prüfen kann:
For Each c In .Range("BD10:BD100")
If Not IsDate(c) And Not IsEmpty(c) Then
UserForm1.TextBox1 = "Cell " & c.Address & " is not a date !"
Exit Sub
End If
Next
Wenn es die Möglichkeit gi...
25.11.2008 08:16:21
Thread-ID: 1027553
5 Beiträge
makro Zeile nach unten verschieben
donald

Hallo,
ich hätte gern ein Makro für folgendes Problem: Ich habe eine tabelle, und wenn ich in eine Spalte, hier H, "Absage" eintrage, soll mir Excel die ganze Zeile nach unten verschieben, z.B. in Zeile 50. Bei einem anderen Wort, "Auftrag", soll mir die ganze Zeile auch verschoben werden,...
02.12.2008 16:08:24
Thread-ID: 1029545
5 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
16
4
5
3
2
2
5
1
4
4
4
2
2
2
4
5
2
2
4
2
4
2
3
7
2