Så vidt jeg kan se, er det Offset-funktionen, du er ude efter.
Prøv følgende:
Sub ea()
With ActiveCell
.Value = "Erik Jensen"
.Offset(0,1).Value = 2068
.Offset(1,0).Value = 8
End with
End Sub
--
Med venlig hilsen
Leo Heuser
"eschultz" <eschultz.news@kandu.dk> skrev i en meddelelse
news:fxNR7.2994$Q3.370558@news010.worldonline.dk...
> F25 og E26 ønskes udskiftet, således at der bliver skrevet i feltet til
> højre for det, der netop er skrevet i. Jeg vil også gerne have
> komandoen for venste og op og ned.
> På forhånd tak.
>
> Sub ea()
> ActiveCell.FormulaR1C1 = "Erik Jensen"
> Range("F25").Select
> ActiveCell.FormulaR1C1 = "2068"
> Range("E26").Select
> ActiveCell.FormulaR1C1 = "8"
> End Sub
>
> --
> Leveret af:
>
http://www.kandu.dk/
> "Vejen til en hurtig løsning"
>