---

Jeg har brug for at tilføje 0-er i nogle filnavne.
Eks:
Tekststrengen 1946-2.jpg skal ændres til 1946-001.
Findes der en funktion, der let kan gøre det eller skal man lave udpluk mm?

Mvh Kurt

---

"Kurt G" <kurt_g@guldbaek.net> skrev den 13 sep 2008 i
news:48cb8e13$0$90273$14726298@news.sunsite.dk:

> Jeg har brug for at tilføje 0-er i nogle filnavne.
> Eks:
> Tekststrengen 1946-2.jpg skal ændres til 1946-001.
> Findes der en funktion, der let kan gøre det eller skal man lave
> udpluk mm?

Det kommer jo an på, om formatet altid er det samme. I ovenstående
tilfælde kunne det f.eks. gøres såden her:

glStreng = "1946-2.jpg"
nyStreng = Left(glStreng, 5) & "001"




--
mvh
Jens Vestergaard
Døgnets jernbanenyheder:
http://www.railsoft.dk/medier.asp

---

"Jens Vestergaard" <j@railsoft.dk> skrev i en meddelelse
news:Xns9B187DACE4E8Djrailsoftdk@62.243.74.163...
> "Kurt G" <kurt_g@guldbaek.net> skrev den 13 sep 2008 i
> news:48cb8e13$0$90273$14726298@news.sunsite.dk:
>
>> Jeg har brug for at tilføje 0-er i nogle filnavne.
>> Eks:
>> Tekststrengen 1946-2.jpg skal ændres til 1946-001.
>> Findes der en funktion, der let kan gøre det eller skal man lave
>> udpluk mm?
>
> Det kommer jo an på, om formatet altid er det samme. I ovenstående
> tilfælde kunne det f.eks. gøres såden her:
>
> glStreng = "1946-2.jpg"
> nyStreng = Left(glStreng, 5) & "001"
> mvh
> Jens Vestergaard
> Døgnets jernbanenyheder:
> http://www.railsoft.dk/medier.asp

Jeg lavede en fejl, og det skulle være forklaret bedre:
Det gælder, at der efter '-' altid skal være 3 cifre, så f.eks.
1946-2.jpg skal ændres til 1946-002.jpg,
1933-43.jpg til 1933-043.jpg men
1919-132.jpg skal derimod uændret være 1919.132.jpg.

Undskyld den dårlige 'opgaveformulering'!

Mvh Kurt

---

On Sat, 13 Sep 2008 13:04:09 +0200, Kurt G wrote:
> Jeg lavede en fejl, og det skulle være forklaret bedre:
> Det gælder, at der efter '-' altid skal være 3 cifre, så f.eks.
> 1946-2.jpg skal ændres til 1946-002.jpg,
> 1933-43.jpg til 1933-043.jpg men
> 1919-132.jpg skal derimod uændret være 1919.132.jpg.
Mener du at '-' skal ændres til '.' når når der i forvejen er 3 cifre,
eller er det en skrivefejl?
Ellers, til inspiration:

Function zpaded(str)
Dim sStrArr
sStrArr = Split(Replace(str, ".", "-"), "-")
zpaded = sStrArr(0) & "-" & Format(sStrArr(1), "#000") & "." &
sStrArr(2)
End Function

--
Benny Andersen

---

"Benny Andersen" <a.mail.user@gmail.com> skrev i en meddelelse
news:n16is9vnjegc$.a0ym7isihhaz$.dlg@40tude.net...
> On Sat, 13 Sep 2008 13:04:09 +0200, Kurt G wrote:
>> Jeg lavede en fejl, og det skulle være forklaret bedre:
>> Det gælder, at der efter '-' altid skal være 3 cifre, så f.eks.
>> 1946-2.jpg skal ændres til 1946-002.jpg,
>> 1933-43.jpg til 1933-043.jpg men
>> 1919-132.jpg skal derimod uændret være 1919.132.jpg.
> Mener du at '-' skal ændres til '.' når når der i forvejen er 3 cifre,
> eller er det en skrivefejl?
> Ellers, til inspiration:
>
> Function zpaded(str)
> Dim sStrArr
> sStrArr = Split(Replace(str, ".", "-"), "-")
> zpaded = sStrArr(0) & "-" & Format(sStrArr(1), "#000") & "." &
> sStrArr(2)
> End Function
>
> --
> Benny Andersen

Det var endnu en skrivefejl.

Jeg prøver et kikke på det du har vist her, jeg kender ikke alle udtrykkene!
Tak
Kurt