We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Private Sub Worksheet_Change(ByVal Target As Range) Dim r As Range Dim t As Range For Each t In Range("E9:E202") If t.Value = "T7" Then For Each r In Range("F9:K202") If r.Value > 0 Then r.Value = -r.Value Next r End If Next t End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Need VBA code to create all combinations of a routing.||30||68|
|does anyone has list of all excel features including the new ones added by 365?||1||15|
|Modifying Exchange 2013 PowerShell command to search through all MessageTransportLog ?||13||14|
|Copy and paste Excel Shapes using vba||6||19|