Datum

Titel

18.04.2024 21:09:11

4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren

18.04.2024 20:45:35

Worksheet_Activate für alle Sheets

18.04.2024 19:30:20

VBA - Tabelle mit Mannschaftsergebnissen sortieren

18.04.2024 18:04:29

Formel fehler Wert#

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1584to1588

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

VBA: Zellinhalte entfernen

Forumthread: VBA: Zellinhalte entfernen
10 Beiträge zu diesem Forumthread
Anzeige
300 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

24.10.2017 12:30:59

Fritz

Hallo VBA-Kundige,
ich bitte euch um Hilfe bei der Umsetzung folgenden Vorhabens.
Ich möchte aus Tabelle1 ein Makro aufrufen, das folgendes leistet:
Es soll prüfen, ob die in Zelle DK5 der Tabelle1 enthaltene Zahl sich im Zellbereich A8:A127 der Tabelle2 befindet. Falls dies zutrifft, sollen die Zellen B:K und N der aus der gleichen Zeile der Tabelle2 "geleert" werden (Zellinhalt "").
Beispiel:
Die Zahl aus Tabelle1!DK5 steht in Tabelle2!A22:
In diesem Fall sollten der Zellbereich Tabelle2!B22:K22;N22 mit dem Wert "" versehen werden.
Für Eure Unterstützung besten Dank im Voraus.
mfg
Fritz

10
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Zum Beispiel

24.10.2017 12:50:52

Michael
AW: Zum Beispiel

24.10.2017 13:08:38

Fritz
AW: Zum Beispiel

24.10.2017 13:40:39

Michael
AW: Zum Beispiel

24.10.2017 13:58:28

Fritz
Das ist aber etwas Anderes...

24.10.2017 14:01:33

Michael
AW: Das ist aber etwas Anderes...

24.10.2017 14:14:54

Fritz
Dann ist Dein Lösch-Makro von Interesse, owT

24.10.2017 14:19:21

Interesse,
AW: Dann ist Dein Lösch-Makro von Interesse, owT

24.10.2017 14:27:45

Interesse,
AW: Dann ist Dein Lösch-Makro von Interesse, owT

24.10.2017 18:56:38

Interesse,
Alles klar, Danke für die Rückmeldung owT

25.10.2017 09:46:55

Michael

Zum Beispiel

24.10.2017 12:50:52

Michael

Hallo Fritz,
...so: https://www.herber.de/bbs/user/117189.xlsm
Infos in der Datei. Nur der Code:

Public OldVal
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Wb As Workbook: Set Wb = ThisWorkbook
Dim Ws As Worksheet: Set Ws = Wb.Worksheets("Tabelle2")
Dim r As Range, c, i&
With Target
If .Cells.Count = 1 And .Address(0, 0) = "DK5" And _
.Value  OldVal Then
Set r = Ws.Range("A8:A127")
c = Application.Match(.Value, r, 0)
If Not IsError(c) Then
i = c + r.Cells(1).Row - 1
With Ws
.Range(.Cells(i, "B"), .Cells(i, "K")) = ""
.Cells(i, "N") = ""
End With
End If
End If
End With
Set Wb = Nothing: Set Ws = Nothing: Set r = Nothing
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If .Address(0, 0) = "DK5" And .Cells.Count = 1 Then
OldVal = .Value
End If
End With
End Sub

LG
Michael

AW: Zum Beispiel

24.10.2017 13:08:38

Fritz

Hallo Michael,
ganz lieben Dank für Deine Hilfe.
Das Makro reagiert aber bei jeder Veränderung des Zellwertes in DK5, aber das sollte nicht der Fall sein.
Ich möchte, das nur bei bestimmten Fällen ausführen.
Könnte man das entsprechend ändern?
Viele Grüße
Fritz

AW: Zum Beispiel

24.10.2017 13:40:39

Michael

Ich möchte, das nur bei bestimmten Fällen ausführen.
Die da wären?
LG
Michael

AW: Zum Beispiel

24.10.2017 13:58:28

Fritz

Hallo Michael,
wenn ich einen Datensatz in Tabelle1 mit der in DK5 enthaltenen Nummer lösche. In Tabelle2 sind zu diesem Datensatz ergänzende Daten enthalten, die über ein Makro eingefügt wurden, somit besteht halt keine Verknüpfung. Daher würde ich gerne immer wenn ich einen Datensatz in Tabelle1 entferne, die diesem Datensatz zugehörenden Daten auch in Tabelle2 entfernen.
Gruß
Fritz

Das ist aber etwas Anderes...

24.10.2017 14:01:33

Michael

Fritz,
...als Du geschrieben hast. Es geht also in Tabelle1 NICHT nur um DK5, sondern um die gesamte Spalte DK, nehme ich an.
würde ich gerne immer wenn ich einen Datensatz in Tabelle1 entferne
Wie machst Du das?
Aber bevor das wieder so ein Endlos-Faden wird: Lade eine Bsp-Datei hoch.
LG
Michael

AW: Das ist aber etwas Anderes...

24.10.2017 14:14:54

Fritz

Hallo Michael,
ich lösche per Makro Daten aus Tabelle1, die zu der in DK5 angezeigten DatensatzNr. gehören.
Die diesen Datensatz jeweils ergänzenden Daten sind in den genannten Zellen im Tabellenblatt Tabelle2.
Gruß
Fritz

Dann ist Dein Lösch-Makro von Interesse, owT

24.10.2017 14:19:21

Interesse,

AW: Dann ist Dein Lösch-Makro von Interesse, owT

24.10.2017 14:27:45

Interesse,

Hallo Michael,
muss dringend weg, melde mich heute abend noch einmal.
Gruß
Fritz

AW: Dann ist Dein Lösch-Makro von Interesse, owT

24.10.2017 18:56:38

Interesse,

Hallo Michael,
wie angekündigt melde ich mich noch einmal.
Ich hab (erstaunlicherweise) das jetzt doch selbst hingekriegt.
Habe das Makro, mit dem die Daten in die Zellen eingefügt werden, dahingehend angepasst, dass nun in die Zellen "" eingefügt wird. Das Makro dann aus dem Makro Loeschen aufgerufen und es funktioniert.
Da hätte ich eigentlich früher draufkommen können.
Möchte mich aber noch einmal bei Dir ganz herzlich für Deine Unterstützung bedanken.
mfg
Fritz

Alles klar, Danke für die Rückmeldung owT

25.10.2017 09:46:55

Michael