Cel inhoud gebruiken voor map naam.

[Verwijderd]

Ik zou graag willen weten,
of dat het mogelijk is om van een cel inhoud in Excel een mapnaam van te maken is.
Ik heb het niet kunnen vinden.

Wat ik wel heb kunnen vinden om de cel inhoud als bestandsnaam te gebruiken.

Wie kan me helpen.

Ik gebruik Office 2003 professional NL SP2.

Alvast bedankt.

[DappereDodo]

Ik heb niet helemaal door wat je wilt doen . Wil je de naam van het huidige bestand in een cel kopieren? Ik ken daar ook geen formule voor, maar het kan wel via een macro:

Range("A1").Value = ThisWorkbook.Name

[Verwijderd]

Dat is niet wat ik bedoel.
Ik wil namelijk de inhoud van een cel een mapnaam wordt.
Dan wordt automatisch de map gemaakt die in de cel staat.

hopelijk is het nu duiderlijker.

[Lustucru]

Nee, echt duidelijk is het niet. Bedoel je een werkmap of een bestandsmap (folder)? En wanneer moet die map dan aangemaakt worden, en waar? Zet even de situatie uiteen en wat uiteindelijk het doel is. Dit is gokwerk naar jouw bedoelingen..

[Verwijderd]

Ik bedoel het volgende.

Ik heb een cel met daar de inhoud 123 nu wil ik dat de 123 een map (folder) word.
en één andere cel kees dat moet het bestandsnaam worden.

Dit wordt dan opgeslagen op schijf D:\Excel.

Is het nu al duidelijker?

[coyote1980]

Verwijderd schreef op maandag 04 september 2006 @ 07:47:
Is het nu al duidelijker?

Misschien bedoel je het niet bot, maar het klinkt wel uitermate bot...

Een mogelijkheid is om je spreadsheet op te slaan in een tekstformaat, CSV bijvoorbeeld, en dan een scriptje te maken dat mappen aanmaakt met namen uit een bepaalde kolom.

[RaZ]

@coyote1980: je kan ook prima opslaan als een Excl bestand, Gewoon de Save As gebruiken.

Ga maar eens in de help kijken van VBA. Ik heb geen Excel hier liggen, maar weet wel dat het kan.
Het ophalen van de inhoud Cells.Range("A1").Value Dan weet je in iedergeval al die waardes te pakken.

Voor de Save As, marco opnemen kiezen, en de code eruithalen die je nodig hebt.

Volgensmij kan je gewoon mkdir gebruiken als een map niet bestaat, zoek daarvoor richting: FileExists

Succes

[Verwijderd]

Inderdaad,

Nu ik erop terug kijk.
Komt het inderdaad bot over.

excusses.

[Verwijderd]

je kan de code in persoonlijk.xls plaatsen zodat deze altijd beschikbaar is
bv. folderinfo staat in cel A1, bestandsnaam in A2

Visual Basic:

if len(dir("d:\excel\" & activesheet.range("a1").value))=0 then
  mkdir "d:\excel\" & activesheet.range("a1").value
end if
activeworkbook.saveas "d:\excel\" & activesheet.range("a1").value & "\" & activesheet.range("a2").value

[Verwijderd]

Hartelijk bedankt _heretic_ voor deze code.
Dit is wat ik zocht.

Nogmaals bedankt!!!