Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.05.2024 20:49:40
Listbox - ausgewählte Zeile aus Tabellenblatt markieren
04.05.2024 16:03:54
Problem mit einer Regel bei bedingter Formatierung
04.05.2024 10:29:31
.Find(what:=..., Lookat:=xlWhole, LookIn:=xlValues) ->For
04.05.2024 09:44:33
Bestimmten bereich aus einem String per VBA separieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1172to1176
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
1172to1176
1172to1176
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen

VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
Steffen
Hallo zusammen,
ich benötige kurz eure kompetente Hilfe!
Ich habe folgendes Problem....
Wenn in Zelle A5 in Mappe1 der Wert 0 steht dann soll die Zeile 9 in Mappe2 gelöscht werden.
Ich hoffen mir kann jemand weiterhelfen!
Vielen Dank für die Hilfe und einen Lieben Gruß
Steffen
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 18:17:19
Urmila
Hallo Stefan,
also wenn du den Wert in der Zelle A5 eingibst dann sowas vielleicht...
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim isect As Range
Set isect = Application.Intersect(Target, Range("A5"))
If Not isect Is Nothing Then
If Sheets("Mappe1").Range("A5").Value = "0" Then
With Sheets("Mappe2")
.Rows("9:9").Delete Shift:=xlUp
End With
End If
End If
End Sub
LG
Urmila
Rückmeldung wäre nett
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 18:59:08
Steffen
Hey Urmila,
vielen Dank für deine schnelle Hilfe.
Ich habe jetzt das Prbolem wie ich den Quelltext integriere.
Das klappt bei mir irgendwie nicht richtig...
Sorry, aber ich bin überhaupt kein Exel und VBA Profi.
Danke und Gruß
Steffen
Anzeige
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 19:01:05
Urmila
Erstmals sorry...Steffen (und nicht Stefan)
wie heißen denn die Tabellenblätter da wo du die 0 eingibst und da wo die Zeile 9 gelöscht werden soll.
LG
Urmila
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 19:08:12
Steffen
HI Urmila,
also die Tabellenblätter heißen "Tabelle1" und "Tabelle2" aber das habe ich in deinem Qualltext schon geändert.
Jetzt ist nur mein Problem wie ich den Quelltext in VBA integriere, damit er das ausführt...
Danke und Grüßle
Steffen
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 19:09:24
Urmila
ohhhh...ok,
den gesamten Code fügst du in Tabelle1 ein...
LG
Urmila
Andernfalls lade die Datei hoch.... :-)
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 19:15:14
Steffen
ja wenn ich den Code in Tabelle1 einfüge und dann F5 drücke, dann kommt ein Fenster wo ich Makroname eingeben soll damit ich es ausführen kann.
Und da scheiterts irgendwie..... weis auch nicht was ich falsch mach
jetzt versuch ich´s mal hochzuladen
Anzeige
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 19:18:07
Urmila
nenene....du gibst den Code ein....danach gibst du dann in der Zelle A5 die 0 ein und es führt automatisch den Code aus....da kannst du nichts mit "F5" etwas bewirken.....
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 19:38:52
Steffen
also der Code funktioniert klasse!
Jetzt habe ich nur noch eine Frage.
Da in der "Tabelle2" wo die Zeile gelöscht wird habe ich Formeln zur Summenbildung drin.
Ist es da auch möglich dass es mir die Zeile nur ausblendet?
Weil sonst passen meine Summen nicht und es verschiebt mir alles.
Vielen herzlichen Dank
LG
Steffen
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 20:39:25
Urmila
Hi, musste kurz weg....
ersetze einfach folgendes....
With.... 
.Rows("9:9").EntireRow.Hidden = True
um die Zeile wieder einzublenden, den TRUE Wert in s FALSE umschreiben...
Nur was ich jetzt nicht verstehe ist...der Code prüf ja ob in Zelle A5 eine 0 steht...wenn ja dann Zeile ausblenden, aber was wenn nict....weiterhin ausblenden oder was soll es machen ? das ist bissl komisch...
LG
Urmila
Anzeige
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 20:44:14
Steffen
Hey Urmila,
also wenn in Zelle A5 eine 0 steht soll er die Zeile ausblenden und wenn in Zelle A5 ein Wert größer wie 0 steht soll er die Zelle einblenden.
Ist das möglich ein Progrämmchen zu schreiben?
Noch eine andere Frage.
Ich kann ja das Programm zweimal untereinander schreiben, wenn ich zum Beispiel bei Zelle A15 das auch machen will oder?
Würdest du das noch für mich machen?
Lieber Gruß
Steffen
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 21:01:25
Urmila
Hallo Steffen...
hier der Code....ersetze ihn komplett....
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim isect As Range
Set isect = Application.Intersect(Target, Range("A5", "A15"))
If Not isect Is Nothing Then
If Sheets("Mappe1").Range("A5").Value = 0 Or Sheets("Mappe1").Range("A15").Value = 0 Then
Sheets("Mappe2").Rows("9:9").EntireRow.Hidden = True
Else
Sheets("Mappe2").Rows("9:9").EntireRow.Hidden = False
End If
End If
End Sub
Schönen Samstag-Abend.... ;-)
LG
Urmila
Rückmeldung wäre nett
Anzeige
AW: VBA: bei Wert 0 in Zelle A5, Zeile 9 löschen
04.09.2010 22:28:50
Steffen
Hey Urmila,
danke für den Code.
Leider funktioniert´s nicht ganz. Wenn die Zeile ausgeblendet wird und danach in die Zelle wieder ein Wert größer 0 eingetragen wird, blendet er die Zeile nicht mehr ein...
Einen schönen Abend noch und vielen Dank für deine Hilfe!
Grüßli
Steffen

388 Forumthreads zu ähnlichen Themen

7 a in eine Zelle schreiben
Kai

Hallo zusammen,
wie bekomme ich es hin, in eine Zelle "7 a" (7 Leerzeichen a) zu schreiben? Excel macht mir dann immer 7:00 AM daraus oder 0,29...
Danke
07.08.2008 16:45:31
Thread-ID: 1000024
6 Beiträge
Anzeige
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Anzeige
VBA - Zelle kopieren bis Wert einer Zelle null ist
Schulze

Halli Hallo,
ich bin ziemlicher Neuling in VBA. Daher würde ich euch bitten mir bei meiner Fragestellung zu helfen und zwar wie folgt: Ich möchte aus einer Tabelle aller Zellen kopieren, bis der Wert einer Zelle 0 annimmt. Diesen bestimten Bereich möchte ich in einer neuen Datei abspeichern...
19.08.2008 08:39:35
Thread-ID: 1002782
17 Beiträge
x ersetzen durch wert aus bestimmter zelle
Ingolf

hallo,
ich muß eine liste erstellen. die werte unten will ich nicht immer eingeben müssen, sondern nur dort wo ein wert stehen soll ein x machen. excel soll mir dann für jedes x den wert aus der zeile 2 der gleichen spalte eintragen. mache ich in eine zelle 2 x, dann muß der wert auch 2 mal...
22.08.2008 09:08:22
Thread-ID: 1003727
5 Beiträge
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Makrostart wenn in Zelle was geschrieben wird
Bernd

Hallo,
wie stelle ich es an, damit ein Makro startet, sobald ich in einer bestimmten Zelle etwas schreibe?
Mein Code will irgendwie nicht so wie ich will. Der läuft ohne nonstop.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Range("D3") "" Then Call tabelle_kopi...
31.08.2008 11:09:00
Thread-ID: 1006152
2 Beiträge
Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 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
5
3
2
4
3
16
4
5
1
5
3
2
1
4
4
6
5
30
3
4
11
8
6
10
4