excel

Algemeen over alle versies van Office.

Moderator: MandersOnline

water
300+ Poster
300+ Poster
Berichten: 345
Lid geworden op: ma 13 dec 2004, 12:29

excel

Bericht door water » di 05 feb 2008, 14:31

Hallo,
Een vraagje, weet niet of het hier thuis hoort, maar ik kom er als maar niet uit. Heb namelijk heeeeel veeeel excel bestanden op mijn computer staan, met verschillende bladen. Nu staat er in heel veel bestanden cv in plaats van bv, is het mogelijk om deze te zoeken en te vervangen? Of moet je ieder bestand apart openen en dan zoeken en vervangen?
Wie weet hier een makkelijk oplossing voor, of heeft hier ook ooit mee te maken gehad?
Bij voorbaat dank en de groetjes!!!

Gebruikersavatar
MandersOnline
Manders Online
Manders Online
Berichten: 23647
Lid geworden op: zo 03 aug 2003, 1:12
Locatie: Amsterdam
Contacteer:

Bericht door MandersOnline » di 05 feb 2008, 20:28

Ik heb het even aangepast naar Excel en direct verhuisd naar Office Algemeen.

Ik ben bang dat je dat verder bij elke file moet aanpassen. je kan wel meerdere dingen in 1x laten aanpassen.
Bezoek ook gerust de hoofd site https://www.mandersonline.nl

water
300+ Poster
300+ Poster
Berichten: 345
Lid geworden op: ma 13 dec 2004, 12:29

Bericht door water » wo 06 feb 2008, 1:01

Oke, jammer, dan zullen we er eens dagen voor gaan zitten. Meerdere dingen vervangen wist ik. Bedankt.

Gebruikersavatar
Timelord
1000+ Poster
1000+ Poster
Berichten: 1073
Lid geworden op: ma 14 mei 2007, 11:32
Contacteer:

Bericht door Timelord » wo 06 feb 2008, 9:56

Je zou het met een hexeditor kunnen proberen, maar ik vraag me dan af of de juiste gegevens wel vervangen worden. Excel wordt namelijk niet als puur klare taal opgeslagen.

Gebruikersavatar
MandersOnline
Manders Online
Manders Online
Berichten: 23647
Lid geworden op: zo 03 aug 2003, 1:12
Locatie: Amsterdam
Contacteer:

Bericht door MandersOnline » wo 06 feb 2008, 15:50

als je dat als optie gebriuikt(ik ken het niet) sla dan wel de excel bestanden ergens op als een soort van Backup.
Bezoek ook gerust de hoofd site https://www.mandersonline.nl

Gebruikersavatar
Timelord
1000+ Poster
1000+ Poster
Berichten: 1073
Lid geworden op: ma 14 mei 2007, 11:32
Contacteer:

Bericht door Timelord » wo 06 feb 2008, 17:12

Wat vertel je me nou Pieter, weet jij niet wat een hexeitor is ?, dat meen je niet. :cheesygrin:

Als je een file in bv notepad laad, dan zie je allemaal vreemde tekens. Zoiets doet een hexeditor ook.

Daarmee kun je in de bron dingen wijzigen. Zelfs rechtstreeks dingen op je harde schijf alhoewel dit natuurlijk wel poepielink is. :wink:

Gebruikersavatar
Pipo
1000+ Poster
1000+ Poster
Berichten: 1245
Lid geworden op: vr 24 sep 2004, 16:26

Bericht door Pipo » wo 06 feb 2008, 20:32

Het wil wel automatisch

Gooi alle bestanden in een map
Gebruik VBA om ze een voor 1 te openen
Laat VBA alles vervangen

Een proggie dat binnen een kwartier geschreven is.

Kom je er niet uit, geef dan maar een gil
dan help ik wel ff


Groeten

Pipo

Gebruikersavatar
Pipo
1000+ Poster
1000+ Poster
Berichten: 1245
Lid geworden op: vr 24 sep 2004, 16:26

Bericht door Pipo » wo 06 feb 2008, 21:10

Open een nieuw Excel werkblad

ga naar macro's

voeg een userform toe

plaats hier een listbox op
plaatshier een commandbutton op
plaats hier een textbox op

dubbelklik op het userform

plak deze code

Private Sub CommandButton1_Click()
ChDir TextBox1
MyName = Dir$("*.xls")
Do While MyName <> ""
ListBox1.AddItem MyName
MyName = Dir
Loop
For tel = 0 To ListBox1.ListCount - 1
ListBox1.Selected(tel) = True
Workbooks.Open Filename:=ListBox1.Text
Cells.Replace What:="cv", Replacement:="bv", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
ActiveWorkbook.Save
ActiveWorkbook.Close
Next tel
End Sub

Private Sub UserForm_Initialize()
TextBox1.Text = "c:\"
End Sub


druk op F5

vil in de textbox de plaats van de Excelbestanden in

druk op de knop

alle cv worden vervangen door bv


suc6

Pipo

Gebruikersavatar
MandersOnline
Manders Online
Manders Online
Berichten: 23647
Lid geworden op: zo 03 aug 2003, 1:12
Locatie: Amsterdam
Contacteer:

Bericht door MandersOnline » wo 06 feb 2008, 22:54

ahhhh Petra, ik lees het geheel verkeerd dus snapte er geen ene klap van , maar hexeditor zegt me natuurlijk veel meer, maar ik lees zoiets snel verkeerd...
Bezoek ook gerust de hoofd site https://www.mandersonline.nl

Gebruikersavatar
Timelord
1000+ Poster
1000+ Poster
Berichten: 1073
Lid geworden op: ma 14 mei 2007, 11:32
Contacteer:

Bericht door Timelord » wo 06 feb 2008, 23:24

Geeft niet, voor problemen kun je hier op het forum terecht. :cheesygrin: :cheesygrin: :cheesygrin:

En voor een brilletje bij Pearl. hahahahahahahahahahahahaha :cheesygrin:

Gebruikersavatar
Pipo
1000+ Poster
1000+ Poster
Berichten: 1245
Lid geworden op: vr 24 sep 2004, 16:26

Bericht door Pipo » do 07 feb 2008, 1:03

Ach Piotr is n betj dislekties :cheesygrin:

Gebruikersavatar
MandersOnline
Manders Online
Manders Online
Berichten: 23647
Lid geworden op: zo 03 aug 2003, 1:12
Locatie: Amsterdam
Contacteer:

Bericht door MandersOnline » do 07 feb 2008, 14:17

Hoe weet jij dat toch Pipo.

Verder ben ik al een poos niet meer bij pearl geweest omdat ik geen bril meer nodig heb, enkel een zonnebril :)
Bezoek ook gerust de hoofd site https://www.mandersonline.nl

Gebruikersavatar
Timelord
1000+ Poster
1000+ Poster
Berichten: 1073
Lid geworden op: ma 14 mei 2007, 11:32
Contacteer:

Bericht door Timelord » do 07 feb 2008, 14:42

Kijk eens aan, Pieter heeft een scherm met geslepen glas ! hahahahahahahahaha

Gebruikersavatar
MandersOnline
Manders Online
Manders Online
Berichten: 23647
Lid geworden op: zo 03 aug 2003, 1:12
Locatie: Amsterdam
Contacteer:

Bericht door MandersOnline » do 07 feb 2008, 17:08

jup goeie opdrachtgevers heb ik he :)
Bezoek ook gerust de hoofd site https://www.mandersonline.nl

water
300+ Poster
300+ Poster
Berichten: 345
Lid geworden op: ma 13 dec 2004, 12:29

Bericht door water » vr 08 feb 2008, 1:04

Hoi, heel hartelijk bedankt voor de reakties. Met wat pipo geschreven heeft ga ik eens uitproberen?? Mocht ik er niet uitkomen mag ik dan nog eens bij je aankloppen Pipo?
Groetjes

Plaats reactie