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
1616to1620
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
1616to1620
1616to1620
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro Zeile am Bereichsende einfügen

Makro Zeile am Bereichsende einfügen
12.04.2018 10:55:42
Franzl
Hallo liebe Excelrellas,
ich mache gerade meine ersten Makro-/VBA-Schritte und hoffe ihr könnt mir weiterhelfen.
Ich habe folgende Tabelle (siehe Foto). Zu jedem "Bereich" gibt es eine dunkle Summenzeile. Ich möchte nun eine Makro erstellen der mir bei Bedarf neue Zeile einfügt. Aber immer über dieser dunklen Summenzeile. Ich habe es bisher nur mit dem Makrorecorder versucht und die Lösung funktioniert auch soweit. Wenn man den Button "neu" drückt, wird im Bereich eine neue Zeile eingefügt. Nur eben leider nicht dauerhaft an der letzten Stelle des Bereichs sondern immer an eine feste Zeilennummer gebunden. Das gibt aber später Probleme mit den Verweisen auf die unendlich vielen Tabellenblätter. Daher brauche ich es unbedingt an letzter Stelle. Könnt ihr mir helfen?
Viele Grüße Franzl
Userbild

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro Zeile am Bereichsende einfügen
12.04.2018 11:18:05
Daniel
Hi
probiers mal mit diesem Code in einem allgemeinen Modul
Sub Richtungspfeil1_Klicken()
ActiveSheet.Shapes(Application.Caller).TopLeftCell.EntireRow.Insert _
CopyOrigin:=xlFormatFromLeftOrAbove
End Sub
diesen Code kannst du jedem Button zuweisen.
Er ermittelt die Zelle, in welcher sich der aufrufende Button befindet (Application.Caller) und fügt oberhalb dieser Zelle eine Zeile ein.
Gruß Daniel
AW: Makro Zeile am Bereichsende einfügen
12.04.2018 11:42:43
Franzl
Hallo Daniel,
danke für deine schnelle Hilfe!
Ich hab den Code jetzt einfach statt des alten Codes (unter Makro/Bearbeiten) für den Button/Makro GEB_neu eingefügt. Vermutlich geht das nicht so einfach per copy and paste. Er bringt mir folgende Fehlermedlung. Was müsste ich ändern? Bzw. wo liegt mein Gedankenfehler? Ich bin wie gesagt noch völliger VBA-neuling...
Viele Grüße Franzi
Userbild
Anzeige
AW: Makro Zeile am Bereichsende einfügen
12.04.2018 11:50:57
Werner
Hallo Franzi,
die Codezeile 
Sub Richtungspfeil_klicken()
muß du löschen.
Gruß Werner
AW: Makro Zeile am Bereichsende einfügen
12.04.2018 11:51:09
Daniel
naja, ein paar Grundlagen musst du dir schon selber beibringen.
z.B. wie das makro grundsätzlich aufgebaut ist.
du darfst kein neues Makro anfangen "S ub ... ()" bevor du das vorherige nicht abgeschlossen hast "End Sub"
und nochmal:
du brauchst nicht für jeden Button ein eigenes Makro.
du kannst das Makro auch für mehrere Buttons verwenden.
Da der Code die Position der Einfügezeile aus der Position des Buttons ermittelt, funktioniert das.
du musst nur aufpassen, dass die Buttons richtig positioniert sind.
Gruß Daniel
Anzeige
AW: Makro Zeile am Bereichsende einfügen
12.04.2018 12:15:47
Franzl
Es funktioniert!!! Danke Daniel und Werner! Ihr seid gigantisch!!
Jetzt hab ich auch die Syntax soweit verstanden. "Sub" leitet die neue Befehlskette ein und dein "Richtungspfeil_Klick()" war der Name des Makros. Dadurch habe ich die Befehlskette aber doppelt eröffnet und auch noch zwei Namen vergeben, was natürlich totaler Quatsch ist.
Und danke für den Hinweis, dass der Makro allgemeingültig ist. Ich hab jetzt alle anderen rausgeschmissen und jedem Button diesen Makro zugewiesen. (Sieht jetzt so aus, siehe Foto)
Funktioniert perfekt und ist ne tolle schlanke Lösung ohne viel Müll!
Würdet ihr mir noch mit der Befehlkette helfen die den Makro darum erweitert die Formel aus der darüberliegenden Zeile runterzuziehen? Per AutoFill also vermutlich.
Userbild
Anzeige
AW: Makro Zeile am Bereichsende einfügen
12.04.2018 12:47:55
Franzl
Wenn ichs genau überlege müsste der Makro sogar aus drei Schritten bestehen:
(1) Zeile einfügen an gewünschter Stelle
(2) Formeln aus der Zeile darüber runter ziehen
(3) das passende Tabellenblatt zu der neue Formel generieren.
Die Tabellenblätter sind alle gelich aufgebaut. Es müsst nur eins kopiert werden und den Namen erhalten der in der entsprechenden Zeile in Spalte B steht.
Geht sowas? Oder wäre es besser dann einen extra Button zu machen für die Erstellung des Tabellenblattes? Irgendetwas in der Richtung dass ich dann in die entsprechende Zelle der Spalte B klicken muss und mir per buttondruck zur aktiven Zelle ein Tabellenblatt generiert wird.
Viele Grüße
Franzl
Anzeige
AW: Makro Zeile am Bereichsende einfügen
15.04.2018 18:23:10
Werner
Hallo Franz,
spätestens jetzt wäre es mal an der Zeit, dass du eine Beispielmappe, mit dem was du bereits hast, hier hochladen würdest. Dann sehen wir mal weiter.
Gruß Werner

320 Forumthreads zu ähnlichen Themen

Spaltentrennzeichen nach speichern in Text-Datei
Michael

Hallo
ich habe ein Problem. Vielleicht ist es schwierig, vielleicht aber auch nicht.
Ich habe eine Text-Datei mit Spaltentrennzeichen "|" (besser als ";" der Übersichtlichtlichkeit halber) und verschiedenen Längen der Spalten.
Ich will diese in Excel überarbeiten und als Text-Dat...
11.09.2008 09:28:00
Thread-ID: 1008978
3 Beiträge
Anzeige
Zeichenkette in einer Zellesuchen
Gordon

Moin,
ich habe in einer Zelle (A1) einen Namen plus ein Datum dazu stehen: "Max Mustermann (01.01.1900)"
Nun möchte ich überprüfen, ob diese Zeichenkette, also Name plus Datum, nochmals in der Zelle A2 steht.
In der Zelle A2 stehen mehrere dieser Zeichenketten. Diese sind in einer...
26.09.2008 12:54:00
Thread-ID: 1012601
4 Beiträge
in spalte müssen 2 gleiche zahlen vorh. sein ...
Jessi

hallo zusammen,
suche nach einem makro, dass in spalte A überprüft ob von den dort geschriebenen zahlen jeweils zwei gleiche vorhanden sind. es geht um eine doppelbelegung eines zimmers. die zahl ist die zimmer-nr.
wäre z.b. nur einmal eine zahl in der spalte, wäre es möglich in das jew...
04.10.2008 15:33:00
Thread-ID: 1014154
5 Beiträge
Anzeige
Unicode-Zeichen in Textfeld von Userform
Userform

Hallo,
Ich bin auf der Suche nach gut praktikablen Möglichkeiten in ein Textfeld eines Userforms Unicode-Zeichen (z.B. ć kleines c mit Akut - Code 0107 oder č kleines c mit Caron - Code 010D) einzutippen.
Danke im voraus für alle Tipps!
Grüße
Günther
12.10.2008 12:34:00
Thread-ID: 1015836
5 Beiträge
Eine Zahl mit vorhandener Zahlenliste vergleichen
Niklas

Hallo Leute!
Es geht darum, eine eingegebene Zahl mit einer vorhandenen Zahlenliste vergleichen und die beiden nächstgelegenen Zahlen der Zahlenliste verwenden!
zur veranschaulichung:
ich habe die die zahlenliste : 1 , 2, 3, 4, 5, 6, 7
der eingegebene Wert ist z.B 1.5 dann soll...
17.10.2008 09:49:22
Thread-ID: 1017045
8 Beiträge
vorgegebene Summe aus Zahlen berechnen
mArsupiLami

Moin!
Ich benötige um regelmäßige Fehlerkorrekturen laufen zu lassen ein Script, dem ich eine Summe vorgebe und eine Range aus Zahlen (von mir aus Zellen A:A), das mir die Zusammenstellung aus Zahlen berechnet, die meine gesuchte Summe ergeben (Noch besser: Alle Kombinationen aus der Zahlen...
21.11.2008 11:25:35
Thread-ID: 1026668
6 Beiträge
Zelle des erstes Vorkommen eines Zeichens ausgeben
-s

Hallo Forum,
ich habe in Zeile 1 in jeder Spalte einen Buchsteben stehen:
a|b|c|c|c|e|
Wie kann ich die Zelle ausgeben lassen, in der beispielsweise das "c" das erste mal vorkommt? Als Ergebnis soll dann C1 ausgegeben werden.
Besten Dank!
-s
07.12.2008 21:32:00
Thread-ID: 1030929
4 Beiträge
Autofilter - Anzahl vorh. Sätze
KViertel

Hallo in die Runde,
In einem Tabellenblatt wird In VBA ein Autofilter gesetzt. Die dabei angezeigten Sätze sollen in ein anderes Tabellenblatt kopiert werden. Wenn jetzt keine Sätze vorhanden sind, wird die Sub abgebrochen. In der Recherche habe ich einen Hinweis zu Subtotal gefunden, weiß...
11.12.2008 11:45:00
Thread-ID: 1031999
3 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
2
11
3
4
3
4
7
5
3
2
4
2
2
5
2
7
11
2
4
4
3
4
5
10
2