Bijgaande een voorbeeld welke ik gebruik :
Rem Attribute VBA_ModuleType=VBADocumentModule
Option VBASupport 1
Sub Blad1
Rem ' Author : WEK ([EMAIL PROTECTED])
Rem ' Versie : 22-09-2005
Rem ' Korte omschrijving :
Rem ' Macro om het tabblad de waarde te geven van de waarde in cel A1.
Rem ' Als er een 'WEK'balletje voor staat, dan wordt deze er afgekapt
Rem ' anders wordt de waarde overgenomen
Rem '
Rem Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Rem On Error Resume Next
Rem If Target = Range("A1") Then
Rem If Mid(Target, 1, 2) = ". " Then
Rem NaamTabblad = Mid(Target, 3, Len(Target) - 2) 'Wanneer de kop
begint met . dan moet het . eraf
Rem Else
Rem NaamTabblad = Target 'Bij het ontbreken van het . dan de
complete inhoud
Rem End If
Rem ActiveSheet.Name = NaamTabblad
Rem End If
Rem End Sub
Rem
Rem
Rem
Rem
End Sub
Deze macro zit bij elk blad. Op het moment dat je A1 wijzigt (met of zonder
. ) wordt de tabnaam gewijzigd.
Nu komen er allemaal Rem-s voor en doe deze het dus nu niet.
Groet,
Werner
-----Oorspronkelijk bericht-----
Van: Cor Nouws [mailto:[EMAIL PROTECTED]
Verzonden: woensdag 27 september 2006 16:21
Aan: [email protected]
Onderwerp: Re: [gebruikers] Calc Macro's
Beste Werner,
|| WEK || wrote:
> Afgelopen weekend stond er een stuk in de Automatiseringsgids over
> OpenOffice metname Calc. De zware Excel gebruikers konden niet zomaar
> overgaan en deden dat dus ook niet op Calc.
Tja, wat is een zware Excel gebruiker?
Ik ken er wel, maar ik ken er ook nogal wat die denken het te zijn :-)
> Zelf ben ik erg enthousiast over OpenOffice, maar inderdaad vanwege
> Excel ben ik nog niet over. Ik maak regelmatig gebruik van VBA en zie
> dit niet zo 1-2-3 vertaald naar Calc-Basic.
Wat voor functies gebruik je dan met /in VBA?
> Mijn vraag is : Hoe ziet de planning voor wat dit betreft eruit. Zijn
> er vertaalslagen te maken ? Voor mij is het nog een hele hobbel, maar
> als iemand mij op weg helpt, zou ik het wel graag willen.
> Vanwege mijn werk - freelance/interim - zou ik met voldoende
> Calc-Basic effort bij diverse klanten direct overgaan op OpenOffice.
> Nu laat dat dus nog op zich wachten en stel ik voor om Office te kopen
> (om mijzelf niet in de weg te zitten als ik met een sheet kom).
Vrij simpel, maar ruw.
Met de OOo-versie van Novell wordt zeer grof geschat 50% gedekt.
Met de StarOffice migration tools wat meer.
En er wordt aan beiden gewerkt.
Het hangt nogal af van wat er in de werkbladen gebeurt. Dus specifieke
informatie kan alleen aan specifieke vragen worden gekoppeld.
> Graag hoor ik jullie mening in deze.
Gewoon zelf mee starten is de beste weg om te ervaren, te leren en bij te
dragen aan de ontwikkeling.
vr. groet,
Cor
--
Cor Nouws
Arnhem - Netherlands
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
