New value in a cell

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi
I'm using this to write a new value in a empty cell
With Worksheets("Ark1")
Set cell = .Cells(Rows.Count, 1).End(xlUp)
End With
If Not IsEmpty(cell) Then Set cell = cell(2)
cell.Value = antal

this code insert a new postin collum A

Now my problem is that i have 2 values i want to ahve in collum
A and B How do i do that?

regards

Alvin
 
if i understand, you wnt something in the cell next to it?

cell.offset(0,1).value = "your 2nd value"
 
Hi

- first , you may want to put a dot '.' in front of the property Rows.Count.
- now to get the cell to the right of the variable cell, you can use :
cell.Offset(0,1)

With Worksheets("Ark1")
Set cell = .Cells(.Rows.Count, 1).End(xlUp)
End With
If Not IsEmpty(cell) Then Set cell = cell(2)
cell.Value = antal
cell.Offset(0,1).Value = ...
 
thanks its working

best regards
ALivn


sebastienm said:
Hi

- first , you may want to put a dot '.' in front of the property Rows.Count.
- now to get the cell to the right of the variable cell, you can use :
cell.Offset(0,1)

With Worksheets("Ark1")
Set cell = .Cells(.Rows.Count, 1).End(xlUp)
End With
If Not IsEmpty(cell) Then Set cell = cell(2)
cell.Value = antal
cell.Offset(0,1).Value = ...
Click to expand...
 
Back
Top