Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

MSG BOX wenn 4 werte unterschiedlich sind

Forumthread: MSG BOX wenn 4 werte unterschiedlich sind

MSG BOX wenn 4 werte unterschiedlich sind
16.10.2024 13:43:49
Peter Grom
hallo
erszmal danke an Onur - GerdL - emkaes für die mühe


hab mich vermutlich ein wenig zu ungenau ausgedrückt

habe eine arbeitsmappe mit mehreren tabellen
in Tabelle5 wird aus 4 tabellen die prüfsumme die in tabelle1/tabelle2/tabelle3/tabelle4 brerechnet werden angezeigt

tabelle1 tabelle2 tabelle3 tabelle4
123 145 123 129

ich möchte dies nun in einer msgbox angezeigt bekommen beim start der excelarbeitsmappe mit button zum abbrechen oder nach neuberechnung der prüfsumme mit einem macro

nochmals danke
mfg peter grom
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MSG BOX wenn 4 werte unterschiedlich sind
16.10.2024 13:49:01
onur
"habe eine arbeitsmappe mit mehreren tabellen " ? Dann solltest du sie auch posten.
AW: MSG BOX wenn 4 werte unterschiedlich sind
16.10.2024 19:22:53
Piet
Hallo

das ist ein Code zum Anzeigen beim Datei Öffnen. Der gehört ins Sheet "Diese Arbeitsmappe"
Beim ändern der Tabellen Werte eine Anzeige bekommen ist glaube ich nicht so einfach.
Formeln lösen meines Wissens kein EventEreignis aus. Das ginge dann nur über Button.

mfg Piet

Option Explicit

Dim Txt1, Txt2, Txt3, Txt4, Txt5

Private Sub Workbook_Open()
Txt1 = Worksheets(1).Range("A1")
Txt2 = Worksheets(2).Range("A1")
Txt3 = Worksheets(3).Range("A1")
Txt4 = Worksheets(4).Range("A1")
MsgBox Txt1 & " " & Txt2 & " " & Txt3 & " " & Txt4
End Sub
Anzeige
AW: MSG BOX wenn 4 werte unterschiedlich sind
16.10.2024 19:27:12
Piet
Nachtrag - die richtigen Tabellennamen und die Zelle wo der Prüfwert steht musst du bitte im Code noch angeben!
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige