Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1400to1404
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
1400to1404
1400to1404
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile automatisch einfügen (mit Formeln)

Zeile automatisch einfügen (mit Formeln)
05.01.2015 10:21:00
Rietfall
Hallo Community,
ich muss beruflich in einer Excel-Datei Zeile automatisch einfügen.
Im bestmöglichen Fall sollte: WENN in der Spalte F etwas größer 0 ist, automatisch darunter eine neue Zeile eingefügt werden und die Formeln schließlich aus der darüberliegenden Zeile übernommen werden.
Wichtig: Die Excel ist größtenteils geschützt, daher ist ein manueller Ablauf nicht möglich.
Ist dies überhaupt möglich über VBA (ich suche jetzt schon lange nach einer Lösung, hab aber leider nichts gefunden!)?
MfG
Rietfall

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile automatisch einfügen (mit Formeln)
05.01.2015 10:35:38
Klaus
Hi Rietfall,
wenn die Datei vor einem manuellem Eingriff geschützt ist, kann meistens auch VBA nichts machen. Gibt es und hast du das Passwort?
Du hast auch einen Logikfehler. Sagen wir mal, in F17 steht die Zahl 3. Excel fügt eine Spalte 18 ein und kopiert die Formeln. In F17 steht jetzt aber immer noch 3. Excel fügt eine Spalte 18 ein und kopiert die Formeln. In F17 steht jetzt aber immer noch 3. Das Murmeltier lässt grüßen :-)
Also, was GENAU willst du? Möglichkeiten die ich sehe:
1) immer wenn in F etwas geändert wird (und nur dann), die geänderte Zelle (und nur die) prüfen ob das größer 0 ist und dann eine Zeile einfügen
2) auf Knopfdruck alle Werte in F durchgehen und bei Bedarf Zeilen einfügen (einmalig)
3) bei jeder Änderung alle Werte in F prüfen, Zeilen einfügen und dann die Werte aus F löschen um die Endlosschleife zu vermeiden.
Grüße,
Klaus M.vdT.

Anzeige
AW: Zeile automatisch einfügen (mit Formeln)
05.01.2015 12:22:15
Rietfall
Hi Klaus M. vdT.;
zu dem von Ihnen genannten Problem: Es sollen keine Werte kopiert werden, sondern ausschließlich nur die Formeln.
Dadurch wäre die von Ihnen genannte erste und dritte Möglichkeit perfekt!
Können Sie mir bei der Umsetzung helfen?
Vielen Dank schon einmal im Voraus!
MfG
Rietfall

AW: Zeile automatisch einfügen (mit Formeln)
05.01.2015 12:24:57
Rietfall
Aso und ja das Passwort ist mir bekannt!!

AW: Zeile automatisch einfügen (mit Formeln)
05.01.2015 13:13:45
Klaus
https://www.herber.de/bbs/user/94761.xlsm
Darfst aber gerne "Du" sagen, das nehme ich mir ja auch heraus :-)
Das Blattschutz-Passwort ist "xxx", kannst (und musst) du direkt im Code ändern.
Grüße,
Klaus M.vdT.

Anzeige
AW: Zeile automatisch einfügen (mit Formeln)
05.01.2015 14:21:49
Rietfall
Vielen Dank schon einmal für alles...war genau das wonach ich gesucht habe...perfekt!
Noch eine kurze Frage:
Ich habe die Programmierung auf die Orginal Datei übertrag und sie funktioniert hervorragend. Was muss ich nun verändern wenn ich eine Zeile löschen will, sobald in Spalte F ein x steht!
Vielleicht können Sie mir hier auch noch weiterhelfen..
Danke
Gruß
Rietfall

AW: Zeile automatisch einfügen (mit Formeln)
05.01.2015 15:09:07
Klaus
Rietfall ... bitte, benutzt das DU! Sonst denke ich, mein Vater steht hinter mir.
Auf die schnelle das Worksheet_Change umgeschrieben:
löscht die Zeile und zieht alles einen nach oben.
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo hell
Const mypass As String = "xxx"
Const abZeile As Long = 2
Const inSpalte As Long = 6
With Application
.EnableEvents = False
.ScreenUpdating = False
End With
If Target.Row >= abZeile And Target.Column = inSpalte Then
ActiveSheet.Unprotect mypass
If Target.Value = "x" Then
Target.EntireRow.Delete shift:=xlUp
Else
If Target.Value * 1 > 0 Then
Target.Offset(1, 0).EntireRow.Insert
Range("I" & Target.Row & ":K" & Target.Row).Copy
Range("I" & Target.Row + 1).PasteSpecial
Application.CutCopyMode = False
End If
End If
End If
hell:
Application.EnableEvents = True
ActiveSheet.Protect mypass
End Sub
Grüße,
Klaus M.vdT:

Anzeige
AW: Zeile automatisch einfügen (mit Formeln)
06.01.2015 22:58:46
Rietfall
Vielen Dank Klaus!!!!
Dankeeee DIR! :D Warst mir eine große Hilfe....Dankeschön!
Gruß
Rietfall

Danke für die Rückmeldung! owT.
07.01.2015 10:42:43
Klaus
.

296 Forumthreads zu ähnlichen Themen

Zeilen Kopieren mit Formeln u. Formaten
Lemmi

Hallo zusammen,
ich möchte einen Block (5Zeilen) am Ende einer Tabelle einfügen!
Diese Zeilen sollen mit ihren Formaten unf Formel Kopiert und am Ende der Leiste eingefügt werden!
Die Formeln sind in den Roten Zellen.
Die Zellen sonst sind bis auf Spalte A und B ohne Inhalt!
11.08.2008 14:11:35
Thread-ID: 1000856
5 Beiträge
Anzeige
einzelne Zellen mit Formeln sperren
natka

Hallo Ihr Lieben Excel Begeisterte,
hättet Ihr bitte eine Tipp für mich, wie ich einzelne Zellen in einenm Tabellenblatt im Excel für Dritte sperren kann. Sie sollen zwar das Ergebnis seheh, aber nicht anklicken können. Damit meine tole Formel keinen Schaden nimmt.
Danke
natka
15.05.2009 14:20:56
Thread-ID: 1075486
4 Beiträge
Zeilen einfügen - Formel übernehmen
Frank

Hallo Zusammen und einen schönen Rest-Sonntag!!!
Irgendwie stehe ich auf dem Schlauch. In Spalte A und F stehen Formeln. Jeweils in A1 und F1 eingegeben und dann runter kopiert. Nun kann es erforderlich werden, dass ich irgendwo eine Zeile einfügen muß und dann ist in der neuen Zeile keine...
12.07.2009 20:27:29
Thread-ID: 1088023
7 Beiträge
Anzeige
Bei Änderung Zeile mit Rahmen einfügen
andi

Hallo zusammen,
habe hier eine Banf in Form einer Tabelle.
Diese hat jetzt zwei Zeilen zum Einfügen von Positionen. Jetzt soll wenn in Spalte "B in Zeile18" etwas eingetragen wird, automatisch eine leere Zeile in der selben Formatierung eingefügt werden, sobald dann in dieser Zeile ein...
07.09.2009 09:21:03
Thread-ID: 1100949
2 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
Formel kopieren mit VBA bis leere Zeile
jo_cindy

HAllo, habe noch keine Formel im Archiv gefunden, die bei mir funktioniert.
Ich möchte in Spalte X ab Zeile 2 die folgende Formel einsetzen: Selection.NumberFormat = "h:mm"
ActiveCell.FormulaR1C1 = "=RC[-8]/24" Diese Formel soll dann in Spalte X solange kopiert werden, bis in Spalte A...
27.10.2009 11:02:17
Thread-ID: 1112437
6 Beiträge
leere Zeile mit Text und Formel dynamisch einfügen
christian

Hallo zusammen,
ich habe folgendes Problem das ich mit meinen wenigen VBA Kenntnissen nicht lösen kann.
Ich habe eine Tabelle mit n Zeilen.
- Nach jeweils ca. 53 Zeilen sollte eine Zeile mit dem Text "Zwischentotal " (Spalte C) und in die Summen-Formel für die 53 Zeilen (Spalte H)...
28.11.2009 13:36:30
Thread-ID: 1120637
3 Beiträge
Zellen mit Formeln einer Zeile kopieren
Jürgen

Hallo VBA-Profis,
da ich hinsichtlich VBA ein Anfänger bin, hoffe ich hier im Forum Hilfe zu bekommen.
Ausgangslage:
In größeren Excel-Tabellen sind neben Daten auch Formeln vorhanden.
Tabelle beginnt z.B. ab A4 und erstreckt sich bis Z800 (Zeile 4 sind Überschriften)
In den...
13.12.2009 15:54:18
Thread-ID: 1123590
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
4
6
3
6
1
1
2
5
2
2
5
4
3
2
8
1
2
1
2
2
2
2
4
3
2