ich benötige eine Schaltfläche die mir in der aktiven Zelle ein "=" schreibt und gleich NACH dem "=" eine Eingabe zuläßt. Geht das?
Gruß Sandra
Sub IstGleich()
SendKeys "="
End Sub
Private Sub CommandButton1_Click()
Dim inValue As Variant
inValue = InputBox("Wertfür Zelle " & ActiveCell.Address & ":", _
"Eingabedialog für Zelle " & ActiveCell.Address)
ActiveCell.Value = "=" & inValue
End Sub