Avatar billede ups34 Nybegynder
13. juli 2009 - 10:21 Der er 6 kommentarer og
1 løsning

HJÆLP, hvorfor virker kode ikke?

Hej
Jeg forstår ikke hvorfor denne kode ikke virker! Jeg startede med at lave en makro, og har kopieret derfra

Private Sub CommandButton1_Click()
Cells.Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Paste

  ChrDir = "P:\Kalkulation_døre\Tilbud\"
  ActiveWorkbook.SaveAs "P:\Kalkulation_døre\Tilbud\Worksheets("Ark1").Range("F1").Text & " " & Worksheets("Ark1").Range("I1").Text"
   
   
End Sub


Det er nok simpelt, men please hjælp mig videre
Avatar billede ups34 Nybegynder
13. juli 2009 - 10:41 #1
Problemet er, at hele linien: %SaveAs% bliver rød, og markering er på ("Ark1")
Avatar billede supertekst Ekspert
13. juli 2009 - 10:58 #2
Måske:

  ActiveWorkbook.SaveAs "P:\Kalkulation_døre\Tilbud\" & Worksheets("Ark1").Range("F1").Text & " " & Worksheets("Ark1").Range("I1").Text & ".xls"
Avatar billede mrgumble Nybegynder
13. juli 2009 - 11:00 #3
Du blander lidt rundt i hvad der er streng og ikke-streng. Få styr på dine gåseøjne.
Jeg tror du vil have at filen skal gemmes som:
"P:\Kalkulation_døre\Tilbud\F1 I1"
Hvor F1 og I1 er teksten i de respektive celler.

Du skal bare rette til:
ActiveWorkbook.SaveAs "P:\Kalkulation_døre\Tilbud\" & Worksheets("Ark1").Range("F1").Text & " " & Worksheets("Ark1").Range("I1").Text"
Avatar billede ups34 Nybegynder
13. juli 2009 - 13:14 #4
Hej begge 2
Mange tak for hjælpen.
Det var supertekst der lavede en rettelse der virkede, jeg kunne ihvertfald ikke få mrgumble´s til at virke. Men umiddelbart ser de jo ens ud, bortsetfra .xls.

Hvis du sender et svar supertekst vil jeg gerne honorere indsatsen, ellers må det jo blive mrgumble ;-)

Endnu engang tak for hjælpen

Ups34
Avatar billede supertekst Ekspert
13. juli 2009 - 13:31 #5
Ok - selv tak...
Avatar billede supertekst Ekspert
13. juli 2009 - 13:34 #6
p.s.: der er også denne forskel: sidste " - efter .Text"
Avatar billede mrgumble Nybegynder
13. juli 2009 - 13:40 #7
Ups, kan se der var et par gåseøjne sidst i mit svar.
Men husk at holde øje med dine gåseøjne. I VB er der desværre ingen omvej når man vil indsætte variabler i tekststrenge end at hoppe ud og ind.
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
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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