ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Need help please (https://www.excelbanter.com/excel-programming/311284-need-help-please.html)

Brian

Need help please
 
I want to use VB to do the following:
if cell h10 is text then upon exit of cell h10 clear cell f10. if cell h10
is a number, then do nothing to cell f10. I want this to apply to cell h10
f10

h11 f11

h12 f12

h13 f13

Thank You
brian

Don Lloyd

Need help please
 
Hi Brian,

Try the following :-

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row < 10 Or Target.Row 13 Then Exit Sub
Application.EnableEvents = False
If Target.Column = 8 Then
If IsNumeric(Target) = False Then
If Len(Target) 0 Then
Target.Offset(0, -2) = ""
End If
End If
End If
Application.EnableEvents = True
End Sub

Cells in the F column should remain except whn text is entered in the H
column.
Clearing F10 etc. will have no effect.

regards,
Don

"Brian" wrote in message
...
I want to use VB to do the following:
if cell h10 is text then upon exit of cell h10 clear cell f10. if cell
h10
is a number, then do nothing to cell f10. I want this to apply to cell
h10
f10

h11 f11

h12 f12

h13 f13

Thank You
brian





All times are GMT +1. The time now is 05:27 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com