Macro to fill column

[Xirom431]

Hi,

I need help with a macro to fill column with value that will skip cell. For example, I need to fill column with value X but skip every other row or every 5 range from A3 to A1000. Thanks for the help in advance.

X or X or X
X
X

X X
X
X X

 

[MARK858]

I'm not sure either from your description or your diagram exactly what you want but perhaps the code below will get you started and you can post back with whatever you need to act differently.

Sub xxx()
    Dim x As Long, i As String

    i = InputBox("Please enter value to insert")

    For x = 3 To 1000 Step 4
        Cells(x, "A").Resize(3, 1).Value = i
    Next

End Sub

 

[Xirom431]

I have a formula in Cell A3. I would like to copy the same formula down the column but skip every other cell and range from A3:A1000

X
Skip
X
Skip
X


or this scenario

X
X
Skip
Skip
X
X


or

X
X
X
X
Skip
Skip
Skip
Skip
X
X
X
X

Basically it looks like a power of 2.

 

[MARK858]

You will have to adjust the 1000 to exactly what you want in each

Sub xxx()
    Dim x As Long, i As String

    

    For x = 3 To 1000 Step 2
    Range("a3").Copy Cells(x, "A")
    Next

End Sub

Sub xxx2()
    Dim x As Long, i As String

    

    For x = 3 To 1000 Step 4
    Range("a3").Copy Cells(x, "A").Resize(2, 1)
    Next

End Sub

Sub xxx3()
Dim x As Long, i As String

    

    For x = 3 To 1000 Step 8
    Range("a3").Copy Cells(x, "A").Resize(4, 1)
    Next

End Sub

 

[Xirom431]

Something is wrong. The macro is working with regular number only. I have formula in Cell V3 and it will indent to the left and run over to the previous column

 

[MARK858]

Sorry, no idea it works fine with formulas for me. I put a formula in A3, ran the first macro and got the results you see in the formula box in the image below

Excel Workbook
	A	B	C	D
3	57			15
4				18
5	59			24
6				18
7	69			17
8				26
9	57			26
10				12
11	58			19
12				13
13	72			26
14				21
15	67			25
16				21
17	63			21
18				23
19	40			19
20				10
21	51			11
Sheet1

 

[MARK858]

Something is wrong. The macro is working with regular number only. I have formula in Cell V3 and it will indent to the left and run over to the previous column

Please show your formula and an example of your data and how are your cells formatted?

+ what shows in your formula bar when you click a cell (both V3 and one of the other cells)