marcro tje?

[ConnyBonarius]

geachte mensen

ik ben bezig in excel.

ik heb een van een bestand (pop) een bestand met doorverwijzingen naar een ander bestand (lol) gestuurd. hierbij kreeg in in mijn tekstbalk waar de doorverwijzing in staat "[E:/blablabla]

hierdoor moet ik die e-schijf overin al mijn bestand met de hand weghalen want de doorverwijzing zit ook in me nieuwe bestand op de zelfde plaats.

nu was mijn vraag.

hoe kun je voor een toetsenhandeling als dit een marcro maken?
en hoe gebruik je een marco?
want ik moet zo'n 500 dingen veranderen

laura warmerdam

alvast bedankt

 

[HSV]

Ik ben geen macro schrijver, maar je kunt met Ctrl+H de "E" vervangen door niets.
Maar als ik het goed begrijp is bestand "lol" gesloten.
Als je die ook opent, is dit [E:\blablabla] weg toch?

 

[snb]

Kijk eens bij menubalk/bewerken/koppelingen. en verwijder de koppeling.

 

[ConnyBonarius]

Reactie op Macro

Kijk eens bij menubalk/bewerken/koppelingen. en verwijder de koppeling.

Ik zal mijn vraag wat meer specificeren:
ik weet dat je in een macro een aantal toetsaanslagen kan vastleggen en die
met een druk op de knop, danwel een toetscombinatie kan uitvoeren. Even een voorbeeld,
ik wil een bepaald gedeelte selecteren, tekst weghalen. Of: ga naar vorige cel en voeg bij tekstsamenvoegen steeds op een bepaalde positie een dollar teken toe. Of...?

=TEKST.SAMENVOEGEN('E:\[ClubOverzichtdefinitiefNabila3DON.xlsx]Formulieroverzicht'!$D$14;$B$3;$B$18)
Als bovenstaande 500 keer in een werkblad staat, hoe zou je nu op een gemakkelijke manier het volgende stuk uit kunnen halen? E:\[ClubOverzichtdefinitiefNabila3DON.xlsx]

Je kan het zo gek niet vinden of ik wil er wel een macro voor. Wederom, omdat het vaak om veel gegevens gaat. Kan dat in een macro in Excel?

En misschien nog gemakkelijker, kan je bovenstaande gegevens niet per cel aanpassen maar overal waar het stuk: E:\[ClubOverzichtdefinitiefNabila3DON.xlsx] staat?

Ik ben ontzettend benieuwd wie me hiermee kan helpen. Alvast dank voor je moeite!

Conny

 

[HSV]

Private Sub CommandButton1_Click()
Cells.Replace What:="'D:\[Vandaag.xls]Blad1'!", Replacement:="", LookAt:= _
        xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub

Heb ik net opgenomen met de recorder, en werkt goed.
Alleen even je eigen bestandsnaam erin zetten.
De VBA goeroes kunnen het veel korter denk ik, maar toch.

 

[Ginger]

Als bovenstaande 500 keer in een werkblad staat, hoe zou je nu op een gemakkelijke manier het volgende stuk uit kunnen halen?

Volgens mij gaf HSV je daar in zijn 1e reactie een uitstekend antwoord op! Gewoon de standaard functionaliteit Ctrl + H voor gebruiken ipv een macro! Nergens voor nodig...

Groet, Leo

P.s. HSV, je getoonde macro is trouwens prima!

 

[ConnyBonarius]

Private Sub CommandButton1_Click()
Cells.Replace What:="'D:\[Vandaag.xls]Blad1'!", Replacement:="", LookAt:= _
        xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub

Heb ik net opgenomen met de recorder, en werkt goed.
Alleen even je eigen bestandsnaam erin zetten.
De VBA goeroes kunnen het veel korter denk ik, maar toch.

Hartelijk dank. Kun je nog even wat uitgebreider terugkomen op de vragen:
1. hoe maak ik (in het algemeen) een makro?
2. dit bovenstaande ziet er veel belovend uit. Maar wat moet ik er mee doen? In een cel kopieren, of...?
3. is dit voor 1 aanpassing of voor alle aanpassingen in het werkblad?

Hoop dat je me weer verder kan helpen.

Groet, Conny

 

[ConnyBonarius]

Volgens mij gaf HSV je daar in zijn 1e reactie een uitstekend antwoord op! Gewoon de standaard functionaliteit Ctrl + H voor gebruiken ipv een macro! Nergens voor nodig...

Groet, Leo

P.s. HSV, je getoonde macro is trouwens prima!

Beste Leo,
Dank je. Toch een paar vragen (voor mij is dit toch wat anders dan schoen veters strikken...)

1.CTRL+H levert op zoeken en vervangen. Dat klopt en is de bedoeling?
2. De origenele formule is:
=TEKST.SAMENVOEGEN('E:\[ClubOverzichtdefinitiefNabila3DON.xlsx]Formulieroverzicht'!$D$14;$B$3;F$18)

Druk ik op CTRL-H dan wordt dit: E:\[ClubOverzichtdefinitiefNabila3DON.xlsx] dus maar een gedeelte. Als ik dan vervangen door: (leeg laat dus) dat accepteert hij niet. Zo lijkt het dat ik het er niet uit krijg.

Hoe dan wel?

Groet en dank.

Conny

 

[HSV]

De meeste specialisten hier op het forum doen dit uit hun hoofd (denk ik).
Dus die schrijven dit letterlijk.
Maar je kan dus zoals ik deed, dit opnemen met de recorder (eventueel wat wijzigen).

Druk Alt+F11 en de VBE opent zich.
Zet de code in de VB editor achter het blad van naam.
Maak een commandbutton op je werkblad en hang de code daar aan.
Dit is voor alle aanpassingen in het werkblad.

 

[HSV]

Beste Leo,

Druk ik op CTRL-H dan wordt dit: E:\[ClubOverzichtdefinitiefNabila3DON.xlsx] dus maar een gedeelte. Als ik dan vervangen door: (leeg laat dus) dat accepteert hij niet. Zo lijkt het dat ik het er niet uit krijg.

Hoe dan wel?

Groet en dank.

Conny

Dat komt denk ik, omdat dat bestand nog open staat.

 

[ConnyBonarius]

Excell VBE

De meeste specialisten hier op het forum doen dit uit hun hoofd (denk ik).
Dus die schrijven dit letterlijk.
Maar je kan dus zoals ik deed, dit opnemen met de recorder (eventueel wat wijzigen).

Druk Alt+F11 en de VBE opent zich.
Zet de code in de VB editor achter het blad van naam.
Maak een commandbutton op je werkblad en hang de code daar aan.
Dit is voor alle aanpassingen in het werkblad.

Beste Harry,
Fijn dat je zo snel reageert. Ik probeer van alles. Ik heb er toch wat vragen over (mijn eerste kennismaking met VBE, weet nu net 10 seceonden wat het betekent.
1. waar of wat is de VBE editor
2. hoe maak ik een commandobutton?
3. hoe activeer en deactiveer ik dan die functie?

Heb ook een printscreen toegevoegd. Als jij dat doet maakt het dat misschien ook duidelijker...
En heb je weer iemand blij gemaakt...

Gegroet,

Conny

 

[HSV]

Ik zie nergens een printscreen Conny, maar hier in het bestandje staat een uitleg.

Succes.

 

[ConnyBonarius]

Kijk eens bij menubalk/bewerken/koppelingen. en verwijder de koppeling.

Hallo,

Dit werkt. Alleen, omdat in de cel formules staan kan ik de foute koppelingen niet snel opsporen via CTRL-F. Hoe kan ik dan wel de pak em beet 25 foute koppelingen snel vinden in het werkblad met ongeveer 1000 koppelingen?

Dank alvast.

Conny