online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Meikel vom 08.06.2019, 20:28 Options

Zellinhalt in einer Msgbox

Guten Abend zusammen,

ich würde gerne noch einFeature in meine Excel-Applikation einfügen, aber ich weiß nicht so richtig wie. Vielleich könnte jemand helfen?

Ich habe in der Tabelle "Calc" in der Spalte "X" ein Kommentarfeld.
Die Spalte "X" hat 500 Zellen. In jeder Zelle kann ein unterschiedlicher Kommentar stehen.

Ich möchte nun, wenn jemand in Tabelle "Limit" in Spalte "F" die entsprechende Zelle anklickt, der Kommentar aus Tabelle "Calc" der entsprechende Zelle als MsgBox angzeigt bekommt.

Ich habe die Zelle in Tabelle " Limit" folgendermaßen deklariert:

=WENN(Calc!X2="";"";"!")

Das bedeute nur wo ein Text in Tabelle "Calc" steht wird ein "!" gesetzt.
Auf dieses "!" soll der User dann draufklicken können und die MsgBox angezeigt bekommen.

Ich hoffe, das war jetzt nicht zuviel. Hat jemand vielleicht eine Idee.
Vielen herzlichen Dank vorab, Gruß meikel


Antwort schreiben

Antwort 1 von Beverly vom 09.06.2019, 09:56 Options

Hi Meikel,

das ließe sich mit einem Doppelklick in die Zelle machen

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column <> 6 Then Exit Sub
    If Target = "!" Then MsgBox Worksheets("Calc").Cells(Target.Row, 24)
    Cancel = True
End Sub


Bis später,
Karin

Antwort 2 von Meikel vom 09.06.2019, 11:38 Options

Liebe Karin,.
vielen herzlichen Dank für den Code.
Funktioniert grundsätzlich einwandfrei.

Hab nur noch ein Problem. Die Zelle mit den Kommentaren in Tabelle "Calc" beginnt in X2, das entsprechende Feld in Tabelle "Limit" beginnt in "F4" , also um 2 Zellen verschoben.

Kann man diese noch berücksichtigen?

Viele Grüße, meikel

Antwort 3 von Beverly vom 09.06.2019, 11:53 Options

Hi Meikel,

Target.Row ist die Zeile der doppelgeklickten Zelle. Wenn du also Target.Row - 2 schreibst, sollte dann der richtige Anzeige erscheinen.

Bis später,
Karin

Antwort 4 von Meikel vom 09.06.2019, 12:52 Options

Hi Karin,

perfekt! Herzlichen Dank.

Gruß, meikel

Ähnliche Themen

MsgBox beim starten der Accessdatei
Robsenponte  19.01.2007 - 60 Hits - 2 Antworten

msgbox button
nighty  03.03.2007 - 103 Hits - 1 Antwort

VBScript File "codes,befehle...?"
bääääärli  31.08.2007 - 185 Hits - 1 Antwort

Datum/Zeit in MsgBox ausgeben lassen
stefanH.  22.02.2008 - 64 Hits - 1 Antwort

Rückgabewert MsgBox
MarcoDelMestre  26.02.2008 - 43 Hits - 2 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Sun Jan 25 18:15:21 2026