Opslaan exelbestand

[albboon]

Hallo Allemaal
Ik heb een paar vraagjes waar ik niet uit kom over EXcel.

Hoe kan ik een bestand automatiche opslaan met een naam uit een cel?
Deze cel wordt iedere keer aangepast, het is een week nr.
met andere woorden als ik week nr. 27 ingeef past
een draaitabel automatische een heleboel data aan
en ik wil dit dan ook opslaan als week 27 of alleen als 27.
als ik daarna deze weer open en pas de cel aan naar nr. 28
wil ik hem automatische opslaan onder week 28 of alleen 28

Het klinkt allemaal makkelijk maar ik krijg dit niet voor elkaaar.
m.vr.gr ALB
later stel ik mijn anderevragen.

 

[fihod]

kijk hier even, misschien ben je dan een eind op weg:
http://www.helpmij.nl/forum/showthread.php?threadid=217721&highlight=opslaan

 

[albboon]

De oplossing die geboden is werkt wel, alleen was dit niet de bedoeling

Ik heb in het bestand 6 werkbladen
in een van de werkbladen staat een cel die bepaalend moet zijn voor opslaan .
bv I4 ( deze is al gerelateerd aan een draaitabel)
Ik heb de vorige oplossing
geprobeerd aan te passen maar kom er niet uit .

wie heeft nog goede iedeeen

alb

 

[jheesterbeek]

Ik heb de code een beetje aangepast, probeer het nog eens:
Sub FileOpslaan
Dim MyDate, MyFile, MyPath
MyPath = ActiveWorkbook.Path
MyFile = MyPath + "\Rapport met volgnummer "& sheets("Blad1").range("A1").value & ".xls"
ActiveWorkbook.SaveAs Filename:=MyFile, FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End sub

"Rapport met volgnummer ": is een tekst waarmee de bestandsnaam begint. Deze kun je naar hartlust aanpassen
sheets("Blad1").range("A1") : bevat de naam van het tabblad en de cel waarin je weeknummer staat.

Succes

John

 

[albboon]

Kijk dat bedoel ik nou.
Het werkt percies zoals ik heb bedoeld .
harstikke bedankt.
Ik ga nu de volgende problemen analiseren en omschrijven.

m.vr.gr Alb

 

[jheesterbeek]

Succes
Zet de vraag nog even op opgelost.....

 

[Paul-RT]

@ jheesterbeek:
Deze code is voor mij in aangepaste vorm erg bruikbaar.
Maar, waar laat ik deze code?
Hoe stop ik die in een werkend document van excel?

 

[jheesterbeek]

Ga naar: Extra - Macro - Visual Basic Editor
Dit is het programma waar je macro's in kunt maken en bewerken. Ieder bestand wordt hier als een project gezien. Klik op het project met de rechtermuisknop en kies voor invoegen module. Plak hier de macro.
Je kunt macros starten via extra - macro - macro's, of je kunt een macro koppelen aan objecten (knoppen, Vlakken, werkbalken etc) en ze starten na een klik op het obeject.
Als je zoekt op dit forum kom je vast veel leerzame dingen tegen. Onderstaande link is een korte training:
http://members.home.nl/t.idema/excel/les.html

Succes

John

 

[Paul-RT]

Thanx; uitgeprint.
Ga ik binnenkort eens mee stoeien. :thumb: