Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.07.2025 18:27:02
Mandatory fields for button & unhide/hide tabs and rows
18.07.2025 17:14:25
Zellen markieren mit relativen Verweisen
18.07.2025 12:37:01
VBA - Erst nach Änderung einer Zelle --> ander Zellen leeren
18.07.2025 11:14:10
VBA "SaveAs" funktioniert nicht mehr
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
388to392
388to392
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile mit darüberliegenden Formeln einfügen

Forumthread: Zeile mit darüberliegenden Formeln einfügen

Zeile mit darüberliegenden Formeln einfügen
25.02.2004 12:55:28
Stefan
Salut!
Ich habe in einer Übersichtstabelle in mehreren Spalten Formeln hinterlegt. Wenn ich zwischendurch eine Zeile einfüge, muss ich jedesmal die darüberliegenden Formeln kopieren und einfügen.
Wer von Euch VBA-Profis kann mir bei dem Makro helfen:
"Zeile einfügen und die Formeln der darüberliegenden Zeile kopieren und einfügen"?
Herzlichen Dank schon mal vorab!
Grüsse
Stefan
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Kategorie
Anpassung
Tags
#formeln #makro #vba
Relevante Fragen
Anzeige
Betreff
Datum
Anwender
Anzeige
AW: Zeile mit darüberliegenden Formeln einfügen
25.02.2004 13:11:37
Bernd Kiehl
Hallo Stefan,
ich habe so ein Makro, was, wenn ich die Eingabe in Spalte C beende, automatisch die Formeln und Formate eine Zeile nach unten kopiert.
Frage: bist du in der Lage dieses Makro in Bezug auf deine Bedürfnisse anzupassen? Wenn "NEIN", dann sage bitte etwas genauer "was in welchen Spalten bzw. Zeilen wo passieren soll" und ich ändere das bei mir.
Userbild
Jeder freut sich über eine Rückmeldung, ich auch!!!
Anzeige
AW: Zeile mit darüberliegenden Formeln einfügen
25.02.2004 13:20:15
Stefan
Salut!
Hört sich gut an. Ich denke ich kann mit meinen Grundkenntnissen das Makro anpassen, falls nicht würde ich mich kurz melden.
Wäre super, wenn Du mir den Code zur Verfügung stellen könntest!
Vielen Dnak nochmals!
Gruß
Stefan
AW: Zeile mit darüberliegenden Formeln einfügen
25.02.2004 13:24:02
Bernd Kiehl
Hallo Stefan,
nur gegen harte $$$$$. Spass beiseite!
hier kommt er............................

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Application.Intersect(Target, Range("C:C")) Is Nothing And Target.Cells.Count = 1 Then
If Target.Offset(1, -2) = "" And Target <> "" Then
Application.EnableEvents = False
Range(Target.Offset(0, -2), Target.Offset(1, 0)).FillDown
Range(Target.Offset(1, -2), Target.Offset(1, 0)).ClearContents
Application.EnableEvents = True
End If
End If
End Sub

............................................................
Userbild
dat ischa man bannig varükkten tünkram, wat!!!
Anzeige
AW: Zeile mit darüberliegenden Formeln einfügen
25.02.2004 14:06:52
Stefan
Hi,
war wohl doch etwas zu vorschnell meine letzte Antwort.
Ich habe mal eine Beispielmappe unter:
https://www.herber.de/bbs/user/3929.xls
abgelegt. Die Spalten mit Formeln und Formaten sind gelb hinterlegt.
Wenn ich jetzt zwischendrin einen neuen Namen einfügen muß, möchte ich z.B, auf Frank gehen und per Makro sagen: "Füge darüber eine neue Zeile ein und kopiere die Formeln und Formate der darüberliegenden Zeile ein"
Herzlichen Danl für Deine Zeit und Mühe!!!
Grüsse
Stefan
Anzeige
AW: Zeile mit Formeln einfügen - NOCH OFFEN
25.02.2004 14:53:28
Bernd Kiehl
Hallo Stefan,
das geht nicht mit meinem Makro zwischendrin etwas einfügen.
Den Code umschreiben ist für mich zu kompliziert, da ich noch kein VBA-Profi.
Ich hatte deine Frage leider anders verstanden, tut mir leid dir doch nicht weiterhelfen zu können.
Userbild
Anzeige
AW: Zeile mit Formeln einfügen
27.02.2004 03:46:58
Jörg Gradert
Hallo Stefan und Bernd,
ich bin auch VBA Anfänger, hier mein Versuch:

Sub Zeile_einfügen()
Dim iRow As Integer
iRow = ActiveCell.Row
Rows(iRow).Insert
Cells(iRow - 1, 1).Copy
Cells(iRow, 1).PasteSpecial Paste:=xlFormulas
Cells(iRow - 1, 3).Copy
Cells(iRow, 3).PasteSpecial Paste:=xlFormulas
Cells(iRow - 1, 7).Copy
Cells(iRow, 7).PasteSpecial Paste:=xlFormulas
End Sub

Gruss Jörg
Anzeige
VIelen Dank!!! Hat soweit geklappt!!!
27.02.2004 09:34:43
stefan
:-))
Danke für die Rückmeldung o.T.
27.02.2004 13:13:33
Jörg Gradert

Forumthreads zu verwandten 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
Spalten mit Formeln mit 1 multiplizieren
Susanne99

Hallo, kriege hier per Datenbankverlinkung teilweise Zahlen eingespielt, die Excel nicht als Zahl, sondern als Text identifiziert. Dem kann ich abhelfen, indem ich den Zellinhalt jeweils mit 1 multipliziere. Wie kann ich die
"*1" in die Formeln in ganzen Spaltenreihen einfügen, ohne jeden...
31.08.2008 10:34:22
Thread-ID: 1006147
8 Beiträge
wenn > Spalte I, dann neue Zeile
Dennis

Hallo Leute,
ich benötige einmal Hilfe eines Experten, da ich noch in den Anfängen stecke.
Ich habe folgendes Problem:
Ich habe eine Liste mit Datensätzen (jeder Datensatz steht für eine Person). Die Datensätze sind unterschiedlich lang. Grds. sind die Datensätze von Spalte A - Spal...
04.09.2008 16:41:00
Thread-ID: 1007458
8 Beiträge
Anzeige
Zeile kopieren wenn wert in Zelle
Andreas

hallo zusammen
in der recherche habe ich diesen code gefunden. da ich jedoch alle zeilen bei welchen in der zelle der spalte h ein "x" steht in ein anderes tabellenblatt kopieren möchte muss ich den code anpassen. nun weiss ich leider nicht was ich verändern muss. wäre super, wenn mir das j...
07.09.2008 20:32:00
Thread-ID: 1008007
3 Beiträge
Text (Datum) aus Zeile mit Zeilenbruch auslesen
Iro

Hallo,
ih habe folgendes Problem: ich muss aus einem vorgegebenen Sheet einen bestimmten Zinssatz zu einem bestimmten (Jahr / Monat) auslesen.
1. Problem: das vorgegebene, gesuchte Datum hat das Format TT.MM.JJJJ, das andere Datum, mit dem ich es vergleichen muss wird mit "Monat Jahr"....
01.10.2008 23:00:06
Thread-ID: 1013778
4 Beiträge
Werte aus PRN Datei einlesen über 65563 Zeilen
Andre´

Hallo alle zusammen,
Ich lese aus einer PRN-Datei die Werte ins Excel ein wie folgt:
Option Explicit
Sub Daten_einlesen() Dim iFree As Integer, strText As String, arrTmp, arrDaten() Dim lngCounter As Long, lngStart As Long, lngEnde As Long ReDim arrDaten(1 To 11, 1 To 1) iFree = Fr...
04.11.2008 08:39:00
Thread-ID: 1021464
12 Beiträge
Wenn Formel mit Spalte
Maris

Hi zusammen,
ist das möglich, dass ich eine Wenn-Formel auf eine Spalte und eine Zelle in der Zeile beziehe? Bsp.:
Tabelle A B C Ergebnis ERM VOLL OHNE 1 x ERM 2 x...
05.11.2008 16:30:00
Thread-ID: 1021984
6 Beiträge
Zeilen kopieren wenn wert in Zelle
Andreas

hallo zusammen
finde für meine herausforderung nichts passendes in der recherche. :-(
ich habe eine tabelle1 mit diversen Einträgen. die Spalten AC, AD, AE enthalten jeweils ein Datum (ist jedoch nicht in jeder Zeile der Fall)
Nun möchte ich folgende Schritte automatisieren
Erst...
24.11.2008 17:08:00
Thread-ID: 1027397
3 Beiträge
wenn zelle gelb, dann ganze zeile loeschen
maxx_1985

Hi zusammen
wie kann man excel das folgende sagen;
wenn in spalte A irgendwo eine gelbe zelle vorkommt, dann loesche mir die ganze ZEILE.
gelb sind naemlich die zwischensummen, die ich raus haben moechte.
danke euch vielmals
gruss
denis
10.12.2008 16:19:09
Thread-ID: 1031735
8 Beiträge
Anzeige
Formel mit VBA kopieren
Hartmut_M

Hallo, ich möchte mit VBA aus einem Bereich die Formeln in einen anderen Bereich kopieren.
Nutze hierfür folgenden code, wobei die variablen spalte und spalteneu für die Spaltennummern stehen:
Range(Cells(5, spalte), Cells(130, spalte)).Select
Selection.AutoFill Destination:=Range(C...
12.12.2008 10:02:26
Thread-ID: 1032307
3 Beiträge
nicht die Formel mitkopieren
TomTom

Hi,
Ich habe in meinem Sheet eine Funktion, mit der will ich verschiedene Zeilen kopieren:
MeineQuelle.Rows(lngZeile).Copy Destination:=MeinZiel.Cells(lngZeile, 1)
Wenn ich nun in einer gefundenen Zeile, die kopiert wird, irgendwo eine Formel drin habe, (die sich auf irgend was bezi...
30.01.2009 11:15:07
Thread-ID: 1045327
8 Beiträge
Anzeige
Zeile ausblenden falls kein Wert
Leon

Hi Zusammen
Habe untenstehenden Code versucht, komme aber nicht weiter.
Wenn in der Zelle A12 nichts steht, wollte ich erreichen,daß die ganze Zeile automatisch ausgeblendet wird ohne Commandbutton.
Private Sub Worksheets_activate() If Range("A12").Value = 0 Then Range("A12").En...
05.02.2009 21:01:00
Thread-ID: 1047510
13 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige