Avatar billede regihr_slein Nybegynder
21. marts 2013 - 14:49 Der er 3 kommentarer og
1 løsning

Anvend markeret cell som range

Hej

Jeg ønsker mig at bruge den celle jeg står i i et Excelark, som udgangspunkt i min VBA kode.


F.eks, hvis jeg står i A5, skal VBA-eval give "A5":

Dim Eval As Range
    Set Eval = Range(ActiveCell)

Eval = "A5"

Håber I kan hjælpe - da jeg har søgt forgæves rundt på nettet.
Avatar billede kabbak Professor
21. marts 2013 - 14:54 #1
Eval = Replace(ActiveCell.Address, "$", "")
Avatar billede kabbak Professor
21. marts 2013 - 14:55 #2
rent faktisk skal din kode være

Dim Eval As string
  Eval =  Replace(ActiveCell.Address, "$", "")

Eval = "A5"
Avatar billede regihr_slein Nybegynder
21. marts 2013 - 20:54 #3
Tak Kabbak

Du smider bare et svar :-)
Avatar billede kabbak Professor
21. marts 2013 - 21:11 #4
;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester