code to install validation across a row

Kade

Active Member
Joined
Jul 20, 2002
Messages
258
Hi all
I have a table which is regularly sourced via "get data" from another xl file

row A will have "0" (zero) occur at irregular intervals

When "O" occurs I would like to automate a cell validation condition (="") on the next 5 cells in that same row (B,C,D,E,F)



I am stumped after
sub validatecells()

Application.Goto Reference:="Query_from_Excel_Files_1"

(pathetic isn't it)
any advice?

tia kd
 

Some videos you may like

Excel Facts

Workdays for a market open Mon, Wed, Friday?
Yes! Use "0101011" for the weekend argument in NETWORKDAYS.INTL or WORKDAY.INTL. The 7 digits start on Monday. 1 means it is a weekend.
L

Legacy 98055

Guest
This should do.
<pre>Sub AutoValidate()
Dim c As Range
For Each c In ActiveSheet.UsedRange.Columns("A").Cells
Debug.Print c.Address & ", " & c.Value
If Not IsEmpty(c) And c.Value = 0 Then
With Range(Cells(c.Row, 2), Cells(c.Row, 6)).Validation
.Delete
.Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="="""""
End With
End If
Next
End Sub

</pre>
tom
 

Watch MrExcel Video

Forum statistics

Threads
1,122,576
Messages
5,596,987
Members
414,115
Latest member
SFUser

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top