Avatar billede Flemming_tb Novice
25. juli 2013 - 05:47 Der er 4 kommentarer og
1 løsning

Indsæt i tilfældig celle.

Når jeg har kopieret F1:G1, så er det at jeg gerne vil indsætte min tekst i en tilfældig celle, ikke nødvendigvis D15 som vist.


    Range("F1:G1").Select
    Selection.Copy
    Range("D15").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
Avatar billede finb Ekspert
25. juli 2013 - 08:40 #1
Efter hukommelsen,
her indsættes tilfældigt i
række  1 til 99 og i
kolonne 1 til 99:

randomize
Range("a1").offset(int(rnd(99)),int(rnd(99)).Select
Avatar billede Flemming_tb Novice
25. juli 2013 - 09:36 #2
Hvis jeg marker en celle, og aktiverer makroen, så skal den indsætte i den celle som jeg lige har markeret.

Flemming
Avatar billede natkatten Mester
25. juli 2013 - 10:25 #3
Range("F1:G1").Copy
ActiveCell.PasteSpecial
Application.CutCopyMode = False
Avatar billede Flemming_tb Novice
25. juli 2013 - 10:42 #4
Perfekt. Tak
Avatar billede natkatten Mester
25. juli 2013 - 10:52 #5
Fint. Her er et svar, så du kan lukke for spørgsmålet.
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