Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
916to920
916to920
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Automatisch neue Zeile einfügen mit Makro.

Forumthread: Automatisch neue Zeile einfügen mit Makro.

Automatisch neue Zeile einfügen mit Makro.
15.10.2007 16:33:00
Bea
Hallo Makro-Spezialisten,
füge eine neue Zeile oberhalb der ersten ein, wenn die erste Zeile (Spalte A bis E) ausgefüllt ist. Signal zum Einfügen neuer Zeile soll sein, wenn Spalte E einen Wert enthält. Die leere Zeile soll z.B. gelb sein.
Das soll automatisch passieren....ich weiß, dass ich eine IF-Schleife benutzen muss, doch die expliziten Befehle fehlen mir...
Danke.

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Automatisch neue Zeile einfügen mit Makro.
15.10.2007 16:46:00
IngGi
Hallo Bea,
das Makro muss in das Modul des betreffenden Tabellenblattes:

Private Sub Worksheet_Change(ByVal Target As Range)
If Application.WorksheetFunction.CountA(Range("A1:E1")) = 5 Then
Range("A1").EntireRow.Insert
Range("A1:E1").Interior.ColorIndex = 19
End If
End Sub

Gruß Ingolf

Anzeige
AW: Automatisch neue Zeile einfügen mit Makro.
15.10.2007 16:56:00
Bea
...es muss nicht jede Spalte ausgefüllt sein, aber E auf jeden Fall. Funktioniert das Makro dann auch?
Danke für die schnelle Hilfe.

AW: Automatisch neue Zeile einfügen mit Makro.
15.10.2007 17:07:28
IngGi
Hallo Bea,
nein, das funktioniert dann so nicht. Aber ich sehe gerade, ich habe ohnehin noch vergessen, die Events abzuschalten. So hätte sich das Makro ständig selbst aufgerufen, da es bei jeder Veränderung im Tabellenblatt aktiv wird.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo ErrHdl
Application.EnableEvents = False
If Range("E1")  "" Then
Range("A1").EntireRow.Insert
Range("A1:E1").Interior.ColorIndex = 19
End If
ErrHdl:
MsgBox "Fehler " & Err.Number & ":" & vbLf & vbLf & Err.Description
Err.Clear
Application.EnableEvents = True
End Sub

Gruß Ingolf

Anzeige
AW: Automatisch neue Zeile einfügen mit Makro.
15.10.2007 23:17:36
Hans
Hi,
was meinst du, bewirkt Err.Clear?
mfg Hans
;

Forumthreads zu verwandten Themen

Exceltabelle in Word
S.H.

Hallo,
evtl. bin ich auch im falschen Forum, aber trotzdem meine Frage:
Ich habe ein Excel Arbeitsblatt unter word eingefügt und möchte dort weitere Zeilen einfügen. Das funktioniert auch soweit, am Ende der Word Seite ist allerdings Schluss. Ich schaffe es nicht, das die Tabelle einen...
20.10.2008 20:22:26
Thread-ID: 1017796
3 Beiträge
Excel-Tabelle in Word-Dokument
Dieter

Hallo Forum,
in die Übergabe einzelner Werte einer Excel-Tabelle in ein Word-Dokument habe ich mich ganz gut eingearbeitet. Nun stehe ich allerdings vor dem Problem, eine ganze Tabelle oder nur einen zusammenhängenden Teil der Tabelle in ein Word-Dokument zu übertragen. Kann mir jemand ein...
27.12.2008 16:58:00
Thread-ID: 1035409
8 Beiträge
Excel Tabelle über 2 Seiten in Word
Ralf

Hallo,
ich möchte eine Excel Tabelle in Word einfügen. Das Problem ist, dass die Tabelle sehr lang ist und über 2 Seiten in Word gehen würde. Sie soll auch automatisch aktualisiert werden, wenn die Originaltabelle in Excel verändert wird.
Gibt es da eine Möglichkeit?
Vielen Dank!
16.04.2009 22:29:58
Thread-ID: 1069191
3 Beiträge
Anzeige
Makro Zeile einfügen und Summe automatisch anpasse
Zoran

Hallo zusammen.
Kann mir jemand mit einem Makro weiterhelfen. Folgendes Problem/Idee habe ich:
Ich würde gern ein Makro haben, dass automatisch eine Zeile einfügt und die Summen (inkl. neuer Zeile) aktualisiert.
Hintergrund ist, dass wir einige User im Unternehmen haben, die nicht...
22.06.2009 08:45:34
Thread-ID: 1083366
2 Beiträge
Anzeige
VBA Zelle finden und einfügen
Einzel

Hallo,
ich hab mal wieder ein kleines VBA Problem
Ich habe in Tabelle 1 unter E3 bis E7 Werte eingetragen.
Nun möchte ich das sie mit einen Code ausgelesen werden und den jeweiliegen Tagen in Tabelle 2 (neben den Tag rechts) eingefügt wird. Und zwar nur der Wert nicht die Formel.
15.07.2009 09:50:12
Thread-ID: 1088685
4 Beiträge
Zwei Excel-Tabellen in WinWord verknüpfen
Andreas

Hallo zusammen,
ich habe eine Word-Datei, in der sich an zwei verschiedenen Stellen zwei eingefügte Excel-Dateien befinden. Diese wurde vor langer Zeit mal aus Excel kopiert. Das Original in Excel existiert nicht mehr.
Jetzt möchte ich das Ergebnis einer Berechnung aus der ersten Tabell...
04.08.2009 13:53:46
Thread-ID: 1093412
2 Beiträge
Excell Tabelle in Word und Format behalten
Christian

Hallo.
Bei importieren einer Excell Tabelle in Word wird das Format der Tabelle immer "verhauen" = in die länge gezogen. Das sieht bescheiden aus. Gibt es eine Möglichkeit die Tabelle so zu importieren damit das Seitenverhältnis bleibt. Ich arbeite mit Word und Excell 2007.
Danke im Vor...
05.08.2009 14:48:21
Thread-ID: 1093759
2 Beiträge
EXCEL-VBA: Zeilen einfügen, wenn
Brinkmeyer

Hallo,
ich habe das Problem eines sehr großen Formulars. Ich möchte gern, dass Zeilen nur angezeigt werden, wenn eine bestimmte Zelle einen Inhalt hat. - So kann das Formular bei leeren Zellen kleiner gehalten werden...
Hat jemand eine Idee?
06.08.2009 19:27:26
Thread-ID: 1094141
2 Beiträge
Zeile für Summe einfügen m. VBA
Lorenz

Hallo VBA-Profis!
Leider wurde ich trotz Recherche nicht mehr fündig. Dieses "mein" Problem wurde in diesem Forum schon behandelt (finde es aber nicht mehr)!
Folgende Aufgabe (Bitte): In Spalte "A" stehen Belegnummern (od ähnliches), es soll nach Ende einer Produktgruppe eine Leezeile e...
07.08.2009 20:12:41
Thread-ID: 1094336
3 Beiträge
pro tabelleneintrag automatisch eine neue Zeile
papa

Hallo liebe Excelianer,
ich möchte über ein Userform diverse Informationen abfragen und diese dann in einer Tabelle ablegen.
Es soll eine Datenbank entstehen, sprich bei jedem neuen Userformeintrag soll in der Tabelle eine neue Zeile verwendet werden.
Bisher hab ich dieses Vorhaben...
06.10.2009 00:10:16
Thread-ID: 1107402
3 Beiträge
aus Word mit Makro in Excel Tabellenblatt wechseln
Joni

Hi,
ich habe das Problem, dass ich aus einem Worddokument eine Exceltabelle, die bereits geöffnet ist, aktivieren möchte und dann da aus 2 Tabellenblättern Werte auslesen. Ich komm da einfach nicht weiter.
Excel als Object habe ich definiert. Beim Workbook und Sheet klappt das nicht meh...
31.10.2009 00:38:15
Thread-ID: 1113446
3 Beiträge
Einfügen Zellen VBA
Hugo

Hallo
Möchte die folgende Formel so anpassen, dass die einzufügende Zellenmenge über eine Variable bezogen wird.
ActiveCell.Offset(0, 0).Range("A1:E1").Insert Shift:=xlDown
DH:
Ich bestimme über folgende Formel die Spaltenzahl, ab welcher die Zellen stehen bleiben müssen.
...
12.12.2009 15:34:31
Thread-ID: 1123484
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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