Rename Filer

Faktisk kunne det være smart hvis man kunne få et program der kunne navngive filerne uf fra et regneark..

du kan gøre det i egneark

hvis du skriver de eksisterende navne i A kolonnen og de nye i B kolonnen, kan denne lille kode gøre det

Public Sub omdøb()
sti = "C:\data\" ' ret til din sti
For Each c In Range("A1:A100").Cells
Name sti & c As sti & c.Offset(0, 1)
Next
End Sub

Nu fremgår det ikke helt hvad du ønsker. Her er et gratis program.
http://rename.lupasfreeware.org/download.php

kabbak-> hvorledes laver jeg den kode? i en bat fil eller hvordan?

I et modul, i en excel projektmappe

kunne du fortælle nærmere om dette? jeg er ikke så hardcore til excel..

Start excel, med en tom mappe
Tryk ALT+F11
nu er du i VBA editoren
Vælg insert > module

kopier min kode derind
luk igen på det øverste X i højre side, så kommer du tilbage på arket.
gem mappen med et navn du finder på
Tjek at Funktioner > Makro > sikkerhed, står til Lav eller mellem, hvis den ikke gr det, kan koden ikke køre.
luk excel
Start excel igen og åben den du lige gemte, hvis du satte sikkerheden til mellem, spørger den om du vil åbne med makroer, svar ja.

Vælg Funktioner> Makro >Makroer, vælg den du satte ind og tryk Afspil

Jeg glemte noget

I A1  navne filerne har nu , f.eks. Mappe1.xls
og  i B1  det navn de skal have bagefter f.eks. Ny Mappe1.xls
det gør du så nedad, til du ikke har flere

I øjeblikket kører koden kun til række 100, men det kan ændres

ligger du et svar kabbak?

et svar ;-))