• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Visual basic lege cel herkennen in excel

Status
Niet open voor verdere reacties.

nielsbl11

Gebruiker
Lid geworden
26 sep 2012
Berichten
98
Als de cellen E5 en E6 leeg zijn moet er niets gebeuren, programma gewoon naar het volgende stukje code

als de cel niet leeg is moet hij alle "$" vervangen door ""

of misschien beter gezegd als er in E5 of E6 een "$" staat moet hij deze veranderen naar ""

Code:
If IsEmpty(ActiveCell.Value) Then

If [E5] = "" then nothing
else: For Each cl In Range("E5:E6").SpecialCells(2)
cl.Value = Replace(cl.Value, "$", "")
 
moet een los stukje code worden wat ik onder de vorige plaats,

hier moet hij gaan kijken of er een foutmelding wordt weergeven:

als de cel niet leeg is moet hij alle "$" vervangen door "" als hij wel leeg is zijn er dus geen foutmeldingen (lege cellen) in kolom B (waar mijn vorige vraag over ging)
 
Kijk eens naar mijn laatste post van je vorige vraag die ik aangepast heb voordat je deze vraag openende.
Ik vind het onzinnig om die tekst eerst te plaatsen met $ tekens om deze vervolgens weer te verwijderen dus
mijn vorige macro doet dit voordat de text geplaatst wordt, en ook in de msgbox zijn ze niet meer zicht baar.

om niet de hele tijd te switchen:

Code:
If c01 <> "" Then
c01 = Replace(c01, "$", "")
msg = "Cel " & c01 & " is niet ingevuld."
MsgBox msg
Range("E5").Value = msg
End If

Niels
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan