custommade
Gebruiker
- Lid geworden
- 18 aug 2011
- Berichten
- 18
Beste mensen, mijn 'probleem' in het kort:
Voor mijn werk exporteer ik dagelijks grote bestanden uit SAP naar Excel. Voor de aanduiding van maanden gebruikt SAP getallen die als als celeigenschap 'tekst' hebben.
Voorbeeld:
200901 (= januari 2009)
201106 (= juni 2011)
Allemaal logisch. Maar nu wil ik toch graag dat dit wordt weergegeven als jan-09 en jun-11. Daarom heb ik een macro aangemaakt waarin ik alle waarden van januari 2009 t/m december 2011 heb aangepast (Start --> Zoeken en bewerken --> Vervangen). In het document waarin de macro heb gemaakt ging dit prima. Als ik nu echter een ander document open en ik voer de macro uit krijg ik de melding 'Fout 1004' en het volgende opsporingsbericht:
Sub servicemonth()
'
' servicemonth Macro
' aanpassen service naar maand
'
'
Range("K23").Select
Application.FindFormat.NumberFormat = "@"
Application.ReplaceFormat.NumberFormat = "[$-413]mmm/yy;@"
Cells.Replace What:="200901", Replacement:="jan 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200902", Replacement:="feb 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200903", Replacement:="maa 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200904", Replacement:="apr 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200905", Replacement:="mei 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200906", Replacement:="jun 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
End Sub
Wie kan mij aangeven wat ik kan doen om dit tegen te gaan, en dus voor alle documenten die getallen bevatten als hierboven vermeld, gewoon maand en jaar te zien krijg als ik mijn macro uitvoer?
Bij voorbaat dank voor de reacties!
Voor mijn werk exporteer ik dagelijks grote bestanden uit SAP naar Excel. Voor de aanduiding van maanden gebruikt SAP getallen die als als celeigenschap 'tekst' hebben.
Voorbeeld:
200901 (= januari 2009)
201106 (= juni 2011)
Allemaal logisch. Maar nu wil ik toch graag dat dit wordt weergegeven als jan-09 en jun-11. Daarom heb ik een macro aangemaakt waarin ik alle waarden van januari 2009 t/m december 2011 heb aangepast (Start --> Zoeken en bewerken --> Vervangen). In het document waarin de macro heb gemaakt ging dit prima. Als ik nu echter een ander document open en ik voer de macro uit krijg ik de melding 'Fout 1004' en het volgende opsporingsbericht:
Sub servicemonth()
'
' servicemonth Macro
' aanpassen service naar maand
'
'
Range("K23").Select
Application.FindFormat.NumberFormat = "@"
Application.ReplaceFormat.NumberFormat = "[$-413]mmm/yy;@"
Cells.Replace What:="200901", Replacement:="jan 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200902", Replacement:="feb 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200903", Replacement:="maa 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200904", Replacement:="apr 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200905", Replacement:="mei 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
Cells.Replace What:="200906", Replacement:="jun 2009", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=True, _
ReplaceFormat:=True
End Sub
Wie kan mij aangeven wat ik kan doen om dit tegen te gaan, en dus voor alle documenten die getallen bevatten als hierboven vermeld, gewoon maand en jaar te zien krijg als ik mijn macro uitvoer?
Bij voorbaat dank voor de reacties!