Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1568to1572
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
Inhaltsverzeichnis

Makro

Makro
21.07.2017 09:36:28
king_basti
Hallo liebe Excel-Freunde,
Ich habe leider ein Problem und zwar ich habe folgenden Code in meinem Makro verwendet. Weiß aber leider nicht wo ich einfügen kann aus welcher Tabelle er die Daten nehmen soll. Hoffe Ihr könnt mir helfen
If Cells(B54, B93).Value = "" Then
MsgBox "FillOut"
End If
If IsEmpty(Cells(B54, B93)) Then
MsgBox "leer"
End If
Hoffe Ihr könnt mir helfen
lg king_basti

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

Betreff
Datum
Anwender
Anzeige
AW: Makro
21.07.2017 10:11:52
UweD
Hallo
wenn B54 und B93 KEINE Zellen, sondern Variablen sind...
dann so...
If Sheets("Tabelle1").Cells(B54, B93).Value = "" Then
LG UweD
AW: Makro
21.07.2017 10:24:29
king_basti
Hallo
Ok danke für die Info hat mir wirklich weiter geholfen.
lg king_basti
AW: Makro
21.07.2017 10:25:26
Werner
Hallo,
oder meinst du so?
Public Sub ttt()
Dim strFormel As String
With Worksheets("Tabelle1") 'Blatt anpassen
strFormel = .Range("B54").Formula & .Range("B93").Formula
End With
If Left(strFormel, 1) = "=" Then
MsgBox "FillOut"
ElseIf strFormel = vbNullString Then
MsgBox "leer"
End If
End Sub
Beide Zellen komplett leer: Ausgabemeldung "leer"
Beide Zellen mit Formel: Ausgabemeldung "FillOut"
B54 leer / B93 mit Formel: Ausgabemeldung "FillOut"
B93 mit Formel / B54 leer: Ausgabemeldung "FillOut"
Gruß Werner
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige