Cell value wont set?

Trinsan · #1 (**permalink**) 01-22-08, 09:17

Okay, so I've done this qyute a few times in the past, but haven't touched code for a few months.

Code:

    x = Selection.Row
    y = Selection.Column
    
    With ActiveSheet
        .Cells(x, (y + 1)).Value = "kfhdfksh"
        ' GIDrs!Medlemsskab
    End With

Its should be pretty obvious what I wish to. Basically I grab the coordinates of the current cell, and want to add a value to the cell next to it. Initially I am just testing with dummy data, but will be fetching data out of an ADO recordset.

Apparently I'm referencing the cell wrong, but can't seem to figure out in which way?

Thanks for any (really noobish) help,

Trin

karthic_85 · #2 (**permalink**) 01-23-08, 06:55

This code works in a way that if i edit any cell then next cell wll be populated with dummy data
what is the problem,can u pls brief?

shades · #3 (**permalink**) 01-23-08, 09:28

It should work, but I don't think you need the parentheses around y+1.

Code:

With ActiveSheet
        .Cells(x, y + 1).Value = "kfhdfksh"
        ' GIDrs!Medlemsskab
    End With

Internet Services

Web Development

Digital Marketing

Consumer Tech