Exel 2003

[boeba]

Hai ik ben boeba (paul)
ben hele tijd met exel 2003 bezig en krijg een eenvoudige formule niet aan lopen kan iemand mij helpen.
formule is =als(x;1)

Bedank bij voorbaat

 

[Withaar]

Wat is de bedoeling?

Formules slaan nooit op de cel waar ze instaan, maar altijd op een ander.

Dus stel ik wil controleren of in cel A1 een waarde staan maak ik een formule in B2; =als(A1<>"";1;0)

Lees; als cel a1 niet leeg is zet dan in B1, cel waarde formule staat, een 1 anders een 0.

 

[boeba]

Eerst wil ik je bedanken voor je snelle reactie.
ik ben op zoek naar een formule waar ik willekeurig op het exel blad een x zet een 1 wordt.

weet jij hier een oplossing voor.

 

[Maglor]

Het menu Bewerken - Vervangen doet dit perfect... Heb je niet eens een formule voor nodig.


btw, het is Excel

 

[Withaar]

x moet dus altijd 1 worden.

Misschien een stomme vraag, maar waarom zet je dan niet direct een 1?

Met een formule zal dit niet gaan, maar ik neem aan dat je dit automatische wilt doen, ipv een handmatige zoek-vervang actie.

Je zult dan toch iets met VBA moeten gaan doen.

Ik zie grof weg twee mogelijkheden.
1. je veranderd de werking van de x-toets op dit specifieke tabblad maar 1.
2. een marco die elke wijziging op het blad controleerd en als er een x ingetyped wordt deze wijzigd in een 1.

Begrijp ik je vraag zo goed?

 

[boeba]

oke
bedank voor alle antwoorden.
oplossing van c. withaar met een marco is de oplossing.


:thumb:

 

[Withaar]

Open VBA met Alt + F11.
Dubbel klik op Blad1.
Ga in het witte blad staan dat rechts verschijnt.
Kopieër onderstaande code hier naar toe.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1000 Then Exit Sub ' kolom 1000 bestaat niet, dus voer altijd uit
Application.EnableEvents = False
Cells.Replace What:="x", Replacement:="1", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Application.EnableEvents = True
End Sub

Klik op het groene Excel icoontje links boven.

Zet op een willekeurige plek een x en hij veranderd in een 1.