Wie Abfrage unterdrücken
22.01.2023 13:49:18
wolfgang
ich habe mir folgendes Makro für den Wert der Zellen einholen erstellt:
Sub Bereich_auslesen()
With ActiveSheet.Range("J2")
.Formula = "='D:\Wohnung.xlsm'!B1"
Tabellenname: "Kosten"
.Value = .Value
End With
With ActiveSheet.Range("J3")
.Formula = "='D:\Wohnung.xlsm'!C1"
.Value = .Value
End With
Tabellenname: "Kosten"
End Sub
Das Problem:Jetzt kommt immer eine MessageBox : Blatt auswählen
kann man dieses ausblenden bzw. deaktivieren, freu mich auf Unterstützung.
mfg
wolfgang
Anzeige