jeg skal overføre ny xl.fil

øh, men måske svært at forstå - jeg er tabt.

Jeg forstår godt- vil lige prøve helt fofra ...

Jeg tror godt jeg ved hvad du mener. Du har en excel fil hvor du har nogle makroer du gerne vil burge i en anden og nyere excel fil. Hvis det er det kan du gøre 2 ting:

1) Du kan gå ind i det gamle ark - klikke <alt+f11> og finde det sted hvor din makro ligger - den hedder nok "save_in ()" så kan du højreklikke på den og exporterer den - så bliver makroen gemt som en fil for sig, som du så kan importere på samme måde.
Er det det du vil så skriv tilbage - så kan jeg guide dig gennem i eftermiddag!

2) Du kan lave det man kalder for en personlig projektmappe - den åbner automatisk hver gang man åbner excel - heri lægger du så din makro, og så har du altid makroen til din rådighed, så uanset hvilket excel ark du åbner ligger personlig i baggrunden og kan køre sine makroer i de andre mapper.
Er det det du vil så skriv tilbage - så kan jeg guide dig gennem i eftermiddag!

Håber at have ramt det du ønsker...

Okay - hvis det er det som swamboo skriver, så findes der også muligheden for at lave en xla-fil.
http://www.win-consult.com/Tips/LibrarySource.asp?App=Guide&Lib=Excel_Tilføjelsesprogram_xla

Hej begge- og foreløbig tak for hjælpen... Jeg kommer dog først til at sidde ved maskinen imorgen ( søndag ) og der ved jeg ikke om nogle kan hjælpe ? Men kl.14.00 imorgen er jeg online... Det ser i hvertifald godt ud foreløbig...

Tja nu sidder jeg her; jeg har den nye fil ( den gamle re slettet) og højreklikker ; som kommer jeg over i visual basic med følgende kode; Sub Export()

 
    Windows("PRICELIST 2004.xls").Activate

    Workbooks.Open Filename:="L:\Pricelists\Save in.xls"

    Windows("PRICELIST 2004.xls").Activate
    Range("A1").Select
    Sheets("Calculations").Select
    Columns("A:J").Select
    Selection.Copy
    Windows("Save in.xls").Activate
    Sheets("Kitchen (calculations)").Select
    Columns("A:A").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Application.Dialogs.Item(xlDialogSaveAs).Show arg1:=X1C_Project
    Range("I47:I52").Select
   
    End Sub

og hvad vil du så gerne have hjælp til ??

Er det den kodestump du gerne vil kunne bruge i alle dine fremtidige excel ark??

Windows("PRICELIST 2004.xls").Activate

    Workbooks.Open Filename:="L:\PriceliSave in.xls"

    Windows("PRICELIST 2004.xls").Activate
    Range("A1").Select
    Sheets("Calculations").Select
    Columns("A:J").Select
    Selection.Copy
    Windows("Save in.xls").Activate
    Sheets("Kitchen (calculations)").Select
    Columns("A:A").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Application.Dialogs.Item(xlDialogSaveAs).Show arg1:=X1C_Project
    Range("I47:I52").Select
   
    End Sub
-------------Stien "Workbooks.Open Filename:="L:\PriceliSave in.xls" findes ikke ???
Når jeg beder om en udregning eller andet kan den ikke finde filen ? Jeg tror at jeg ikke har lavet en rigtig makro.

JEPS---

Er du sikker på at L:\PriceliSave in.xls findes?? Ellers skal du ændre den første linie...

Prøv at skriv stien rigtigt........ L:\Pricelists\Save in.xls ........ som i den første du viste......

Jeg springer fra her

OKEJ; min sti hvor filen save in.xl ligger faktisk på denne sti: \\Server\data\VOKE3

Kan du ikke prøve at finde stedet i stifinder og så kopiere adressen over - jeg har lidt svært ved at sige hvordan den ser ud når jeg ikke har set din fil-struktur. Det er selvfølgelig MEGET vigtigt at den er rigtig stavet hele vejen...!!!

Nu kører stien rigtigt; skal jeg nu få den til at køre eller.../ running/ og hvis havd gemmer man den så som`?

Har du den gamle fil du brugte stadig?? Virker makro'en som den skal?? Ellers ret den til så den er helt perfekt og virker - så er det lettere at finde evt fejl vi laver undervejs...

okej, nu kører den ..

Hvis jeg kører; run ,så kommer jeg over i "save in.filen" og så spørger den om hvad jeg skal kalde filen?

Yep - men du har jo heller ikke kaldt den noget i din kode. Der kan du jo tildele den et navn, så den f.eks. bliver kaldt for det sammen hver gang eks: data29-02-04 eller lignende. Men kan vi se på det til sidst.

Jeg har lige et par ? til dig:
1)Det nye ark - bliver det også erstattet af et nyt ark, eller er det det du skal bruge fremover - så kunne vi bare føre makroen derover.
2) Den pc du sidder på nu - er det den du fremover skal bruge makroen på, eller skal du også bruge den på andre pc'ere??

Jeg skal bruge en fil der hedder " pricelist 2004" - det er den som er grundlaget for alle brugere...Den opretter skabe,hylder, m.m. Og filen save in. skal så være en gemme fil..Vi bruger alle makroen fra en mappe...på vores fællesdrev.
MEN; når jeg er i "pricelist 2004." /den nye fil/og prøver at få tegnet et køkken skriver den "kopi af pricelist.xl ikke fundet ??" Altså giver menuen en forkert kode, for jeg har ikke nogen filer der hedder " kopi af pricelist.xl"

send lige din kode igen - du har rettet i den skrev du før...

Sub Export()

 
    Windows("PRICELIST 2004.xls").Activate

    Workbooks.Open Filename:="\\Server\data\VOKE3\Save in.xls"

    Windows("PRICELIST 2004.xls").Activate
    Range("A1").Select
    Sheets("Calculations").Select
    Columns("A:J").Select
    Selection.Copy
    Windows("Save in.xls").Activate
    Sheets("Kitchen (calculations)").Select
    Columns("A:A").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Application.Dialogs.Item(xlDialogSaveAs).Show arg1:=X1C_Project
    Range("I47:I52").Select

Jeg er ikke helt sikker i min sag, for det har ikke noget med denne makro at gøre. Jeg tror nærmere at du har fået lavet en rellation til et ark (kopi af....xl) som den så gerne vil have lov til at hente nogle oplysninger fra.
Hvis du direkte under funktioner - makro tvinger den til at køre denne "export" makro - får du så også fejlen??

Hvis jeg under makro - afspiller ny makro; så er det ok.
MEN når jeg så beder om nye hylder, eller bruger andre tabeller, så er det den skriver " kan ikke finde kopi af pricelist.xl. "
På de andre maskiner skriver den anderledes...???

Jeg tror ikke det er din makro der er noget galt med. Finder lige en løsning... BRB!

Prøv at se på

http://www.pudser.dk/eksperten/findlink/findlink.zip

Det lille program Findlink har tidligere været en stor hjælp for mig.

Okej tak - nu prøver jeg sidste gang at forklare mit problem;
jeg sidder med en server og 3 maskiner koblet op! Vi arbejder med excel- og her arbejder jeg med filen. "pricelist 2004.xl." Den indeholder 8 mb. med hylder og lign. Vores gamle fil " pricelist " er slettet fra en fælles mappe \\Server\data\VOKE3. Nu skal alle maskiner bruge den ene fil til at arbejde med, så jeg gør dokumenter klar.
Jeg sætter sikkerheden på et nyt dokument til lav ( funktioner - makro -sikkerhed) for at kunne køre alle makroer...
Så åbener jeg det nye dokument "pricelist.xl"( efter at tage dokumentets skrivebeskyttelse af )og vil gøre det klar.
Jeg finder en værktøjsmenu frem som hedder (A 2004) der indeholder forskellige typer skabe, mm.m. ( vis - værktøjsliner - A2004 )Så skriver manden der har lavet filen at man skal højreklikke på disse menuer fra A 2004 og "edit-macro...." MEN på mine menuer er der ingen " makro ..."
Men når jeg så har kørt dette igennem, skal jeg lukke filen.
Så åbner jeg en anden fil " Save In.xls" som jeg skal rette til på følgende måde; ændre stien i dens dens mic.visual basic.
Så saver jeg.
MEN; så går jeg over og starter "pricelist.xl", og skal til at vælge skabe, fra den øverste menu ( A2004) så skriver maskinerne ..." Kan ikke finde Kopi af ..- Kan ikke finde......." Hver maskine spørger efter 3 forskellige filer - ens for alle er at jeg ikke kan få priclist. til at virke.

Hvis jeg forstår det rigtigt nu...... så opstår dine problemer, når du trykker på knapperne i værktøjslinien A2004... rigtigt ?!

Hvis det er rigtigt, så er det fordi, at de knapper du har i din værktøjslinie er tilknyttet makro'erne i den gamle fil, og værktøjsliniens knapper gemmer faktisk hele stien....

Løsning: Værktøjslinien skal laves om, så knapperne peger på makro'erne i den nye fil. Altså noget med at vælge  Vis | Værktøjslinier | Tilpas...  højreklik på hver eneste knap og tildel en makro fra den nye fil........

Der kan der være lidt problemer afhængigt af hvordan det er lavet.

Løser dette ikke dit problem, så finder du mig og min email her: www.win-consult.com

Grunden til at jeg gav dig min web-adresse er, at så kan du sende det hele til mig, så vil jeg kigge på det i morgen.
Jeg lever af tavshedspligt.

Hva så ?

hej flemming- du gav mig løsningen - ( den var lige foran mig--- stik mig et svar og du får point )

Løsning: Værktøjslinien skal laves om, så knapperne peger på makro'erne i den nye fil. Altså noget med at vælge  Vis | Værktøjslinier | Tilpas...  højreklik på hver eneste knap og tildel en makro fra den nye fil........

tja-så kommer svaret