Office - Word, Excel und Co. 9.744 Themen, 41.408 Beiträge

EXCEL Zeile automatisch einfügen

Vanesilv / 28 Antworten / Flachansicht Nickles

Hi
Nochmals zum mein Problem

Ich habe eine Artikelliste die Dauernd erweitert wird
In dieser Liste sind Verknüpfungen zu einer anderen Liste
Z.B. In A1 gebe ich die Artikelnummer ein
In A2 erscheint der Artikel der mittels SVERWEIS erzeugt wird bzw. Zusätzlich weitere Zellen in denen weitre Daten eingetragen werden
Nun möchte ich das wenn ich in der Letzen Zeile anfange zu schreiben oder fertig bin
Eine neue Zeile mit allen Formeln und den Rahmenlinie der Vorhergehende Zeile ohne den eingaben die ich gemacht habe eingefügt wird
Wer kann mir helfen

Gruß Alfonso

bei Antwort benachrichtigen
hddiesel Vanesilv „EXCEL Zeile automatisch einfügen“
Optionen

Hallo Alfonso,

ein kurzes Beispiel:
A = EinzelSpalte in Zeile entsperren
B = EinzelSpalte in Zeile entsperren
E,F,G = 1. VerbundeneSpalten in Zeile entsperren
I = EinzelSpalte in Zeile entsperren
K,L,M = 2. VerbundeneSpalten entsperren in Zeile entsperren

Diese Zeilen ersetzen die vorhandenen im Makro, welche den Zellschutz entfernen:

Range("A" & (MaxDatenZeile)).Locked = False ' Einzelzellen entsperren
Range("B" & (MaxDatenZeile)).Locked = False ' Einzelzellen entsperren
Range("E:F:G" & (MaxDatenZeile)).Locked = False ' Verbundene Zellen entsperren
Range("I" & (MaxDatenZeile)).Locked = False ' Einzelzellen entsperren
Range("K:L:M" & (MaxDatenZeile)).Locked = False ' Verbundene Zellen entsperren

Denke daran, immer eine Kopie der Datei zum Testen nehmen!!!

Windows 10 Pro 64-Bit, 22H2: MS Office Pro Plus 2016 32-Bit: Mein Motto: Leben und leben lassen: Gruss Karl
bei Antwort benachrichtigen