03.01.2023, 15:48
Hallo,
habe in meiner Tabelle den Doppelklick ausgeschaltet, wer kann mir sagen wie ich den wieder einschalten kann?
und wer kann mir sagen welche Formel das ist ?
Sorry, aber mein Kolzkopf ist total zu
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20160725
Dim xFormula As String
On Error GoTo Out:
xFormula = Target.Cells(1).Validation.Formula1
If Left(xFormula, 1) = "=" Then
Target.Cells(1) = Range(Mid(xFormula, 1)).Cells(1).Value
End If
Out:
End Sub
habe in meiner Tabelle den Doppelklick ausgeschaltet, wer kann mir sagen wie ich den wieder einschalten kann?
und wer kann mir sagen welche Formel das ist ?
Sorry, aber mein Kolzkopf ist total zu
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice 20160725
Dim xFormula As String
On Error GoTo Out:
xFormula = Target.Cells(1).Validation.Formula1
If Left(xFormula, 1) = "=" Then
Target.Cells(1) = Range(Mid(xFormula, 1)).Cells(1).Value
End If
Out:
End Sub