Zasadniczo to, co chcę zrobić, to wyświetlić wartości w konkretnej kolumnie tylko wtedy, gdy podświetlony jest wiersz (B5) (dalej kolumna E). A jeśli jest podświetlony, pomnóż kolumnę C przez D.
Czy ktoś mógłby mi pomóc? Dzięki
Zasadniczo to, co chcę zrobić, to wyświetlić wartości w konkretnej kolumnie tylko wtedy, gdy podświetlony jest wiersz (B5) (dalej kolumna E). A jeśli jest podświetlony, pomnóż kolumnę C przez D.
Czy ktoś mógłby mi pomóc? Dzięki
Odpowiedzi:
Nie powiedziałeś, czy możesz używać makr. Jeśli możesz, to właśnie użyłbym:
Option Explicit
Dim TCol As Integer
Dim TRow As Integer
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If TCol = 5 Then Range("E" & TRow).Value = ""
TCol = Target.Column
TRow = Target.Row
If TCol = 5 Then Range("E" & TRow).Value = Range("C" & TRow).Value * Range("D" & TRow).Value
End Sub
The TCol i Trow zmienne muszą pozostać poza opcją SheetSelectionChange (w opcji Explicit), więc pozostają aktywne i nie są ponownie deklarowane do 0 przy każdym kliknięciu nowej komórki.