Is het mogelijk om in een beveiligd werkblad, na invoer van een waarde in
een cel, via de Enter-toets naar de volgende onbeveiligde cel te springen?
De onbeveiligde cellen liggen niet noodzakelijkerwijs onmiddellijk naast of
onder elkaar !
Ik weet dat het mogelijk is via de Tab-toets, maar kan hetzelfde resultaat
ook bereikt worden via de Enter-toets ?
Wie kan mij helpen?
Ger
Enter doet dat ook alleen standaard per kolom terwijl tab de rijen
afgaat. Je kan het gedrag van de enter-toets wel aanpassen onder opties.
MVrGr,
Marco
Jouw voorstel om het gedrag van de Enter-toets aan te passen biedt helaas
geen afdoende oplossing voor mijn vraag. Ik wil namelijk de beveiligde
cellen overslaan. Wat ik bedoel is bijvoorbeeld het volgende:
In een beveiligd werkblad zijn de cellen A1, A9, C3 en D6 niet beveiligd,
omdat daarin gemuteerd mag worden.
Is het bij Excel mogelijk om na invoer van een waarde in cel A1 op Enter te
drukken waardoor de cursor meteen naar cel A9 verspringt, vervolgens een
waarde in cel A9 invullen en na het drukken op Enter bij cel C3 uitkomen
etc. ?
Misschien via Visual Basic?
In maak gebruik van Excel 2000.
Bedankt,
Ger
"MarcoS" <mPUNT...@HOBBYCOMPUTERCLUBnet.nl> schreef in bericht
news:4b023a94$0$41722$dbd4...@news.wanadoo.nl...
Als het werkblad is beveiligd en je hebt aangegeven dat vergrendelde cellen
niet mogen worden geselecteerd, dan zul je ook met de Enter-toets van
ontgrendelde cel naar ontgrendelde cel springen.
Jan
Met Excel 2000 werkt dat niet.
VBA zou kunnen maar waarschijnlijk wordt het werkblad daar een stuk
trager van.
MVrGr,
Marco
Je hebt gelijk, ik had over 't hoofd gezien dat het om Excel 2000 ging.
Overigens kan een betrekkelijk eenvoudige VBA code hier een oplossing
bieden.
Zet onderstaande in een algemene module:
Option Explicit
Sub VolgendeCel()
ActiveCell.Next.Activate
End Sub
en zet de volgende procedure in de module van het WorkBook:
Option Explicit
Private Sub Workbook_Open()
Application.OnKey "{RETURN}", "VolgendeCel"
End Sub
Dit zal het werkblad niet merkbaar vertragen vermoed ik.
Jan
Ik heb onderstaande VBA-code geprobeerd, maar het is niet gelukt.
Ik heb de Sub VolgendeCel in een aparte module gezet en de private sub in
ThisWorkbook, beide voorafgegaan door Option Explicit, maar helaas .......
Ik weet niet wat ik verkeerd heb gedaan, dus ik laat het maar hierbij.
Jammer, maar toch bedankt voor jullie moeite.
Ger
"jan" <j...@releerf.nl> schreef in bericht
news:u9sZA9ia...@TK2MSFTNGP04.phx.gbl...
Jammer dat je het opgeeft. Het werkt namelijk wel, ook in Excel 2000.
Je moet overigens wel het bestand opslaan en opnieuw openen voordat het
werkt en het blad moet ook echt beveiligd zijn.
MVrGr,
Marco
Ger schreef:
Ik wil het bestand wel eens opsturen.
Misschien heb ik toch nog iets fout gedaan.
Ik hoor het wel.
Ger
"MarcoS" <mPUNT...@HOBBYCOMPUTERCLUBnet.nl> schreef in bericht
news:4b079a68$0$39808$dbd4...@news.wanadoo.nl...
Succes Tonny
"Ger" <gvancal...@home.nl> schreef in bericht
news:OR4HG3xZ...@TK2MSFTNGP05.phx.gbl...