хотелось бы чтоб при выборе ячейки в RefEdit, выбранная ячейка выделялась например цветом (мгновенно при выборе, а не по нажатию кнопки)...
что-то типа того что делает данный код, но надо с использованием refedit
- Код: Выделить всё
Private iRange As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
iRange.Interior.ColorIndex = 0
Target.Interior.ColorIndex = 3
Set iRange = Target
End Sub
после продолжительной борьбы удалось заставить ее реагировать на изменение значения в текущей ячейке таким способом
- Код: Выделить всё
Private Sub RefEdit1_Change()
Dim ref As Range
On Error Resume Next
Set ref = Range(Me.RefEdit1)
If Not ref Is Nothing Then
RefEdit1.Enabled = False
ref.Value = "раздватри"
RefEdit1.Enabled = True
RefEdit1.SetFocus
End If
End Sub
(без шаманства с Enabled True-False + SetFocus не работает)
подставление чего-либо типа ref.Interior.ColorIndex = 3, вместо ref.Value = "раздватри" не работает. почему? и что надо сделать?
уверен что это все можно объединить, но увы не знаю как...
