• 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.

Lege cel is niet leeg

Status
Niet open voor verdere reacties.
Georgyboy

Georgyboy

Gebruiker
Lid geworden
6 jan 2007
Berichten
883
Besturingssysteem
Windows 11
Office versie
365
Goedemorgen

Lege cel is niet leeg ondanks niets zichtbaar ook met filter zijn het lege cellen.

Van uit een ERP systeem kunnen we gegevens exporteren naar een tekstbestand of zelf in excel,
met excel kunnen we dan verder alle gegevens analyseren.

Om dit te kunnen doen moeten alle velden ingevuld zijn, dit kan normaal eenvoudig door

Zoeken en selecteren --> selecteren speciaal --> lege waarden

en dan via CTRL + ENTER alle lege cellen aanvullen.

Nu moeten de cellen éérst leeg (alhoewel leeg, denk ik) alvorens dit te kunnen doen.
enkele cellen leeg gemaakt via : cellen selecteren --> wissen --> alles wissen (Cellen A3, A4, A5)

Hoe kunnen we dit makkelijk oplossen ?
Wat zou de reden kunnen zijn ?

Alvast bedankt !
Groeten Georgyboy
 

Bijlagen

  • Lege cel = niet leeg.png
    Lege cel = niet leeg.png
    26,8 KB · Weergaven: 78
  • Lege cellen zijn niet leeg juni-2018.xlsx
    10,9 KB · Weergaven: 54
Ik bekijk je vraag op een tablet en kan je bijlage nu niet bekijken. Maar selecteer eens zo'n lege cel. Probeer dan eens in de formulebalk om het "niets" te selecteren en daarna te kopiëren. Dit kan je dan in je zoek en vervang venster plakken.
 
Hey Ginger bedankt voor je antwoord


Heb je voortel gedaan, wat met opvalt dat de cel enkele plaatsen verder staat (en dus niet leeg is)
vervangen lukte me niet

bij backspace is dit weer een lege cel



Lege cel = niet leeg.png

Lege cel niet leeg.png
lege waarden voorwaardelijke opmaak.png
 
Laatst bewerkt:
Het zijn de cellen A3, A4 en A5 die echt leeg zijn
De andere cellen t/m A29, m.u.v. A21, bevatten een rits spaties.
Zo ook de kolommen B, C, en D:

lgt.JPG
 
Laatst bewerkt:
Bedankt Edmoor,


Inderdaad ! kunnen we in deze (enkel deze) dan de spaties wissen ?


Alvast bedankt

Lege cel gekopieerd en via vervangen.png
 
Dat kan met een simpel stukje VBA:
Code: 
Sub SpatiesWissen()
    For Each cl In Range("A1:D" & Range("A1").CurrentRegion.Rows.Count)
        If Trim(cl.Value) = "" Then cl.Value = vbNullString
    Next cl
End Sub
 
Als er geen formules in het werkblad staan.

Code in moduleblad van toepassing.
Code: 
sub hsv()
usedrange = application.trim(usedrange)
end sub
 
Bedankt Edmoor :thumb:

Huidige tabel méér dan 10.000 regels had ik een filter geplaatst en kolom per kolom naar "lege cellen" gezocht en deze gewist.

Jouw voorstel zal véél sneller gaan :)

Kan ik dit opslaan als UDF of zo iets om meermaals, wanneer nodig te gebruiken ?


Groeten
Georgyboy
 
O jij ook bedankt HSV :)

wat zijn we weer verwend !

bedankt helpmij vrienden
 
Het is geen UDF, maar uiteraard kan je die in het document opslaan en gebruiken wanneer nodig.
Misschien tijdens het openen van het document? Dan dit in de ThisWorkbook sectie:
Code: 
Private Sub Workbook_Open()
    Application.ScreenUpdating = False
    For Each cl In Sheets("Blad1").Range("A1:D" & Range("A1").CurrentRegion.Rows.Count)
        If Trim(cl.Value) = "" Then cl.Value = vbNullString
    Next cl
    Application.ScreenUpdating = True
End Sub
 
@ Edmoor
@ Hsv

Heb beide codes getest

De code van Edmoor lukte mij (top !)
De jouwe Hsv is me niet gelukt (zal wel aan mij liggen)
 
Maakt niet uit, wat werkt dat werkt.

De code van mij hoort in moduleblad (blad1).
 
Nog deze in de aanbieding

Code: 
Sub M_snb()
   Sheet1.Cells.UnMerge
   Sheet1.Cells.Replace " ", "", 2
End Sub
 
:thumb:
Allen bedankt voor de antwoorden en het leerzame
bedankt voor je bijkomende info Harry, dit weten we ook weeral !

Groeten Georgyboy
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan