Helpmij.nl
Helpmij.nl
Helpmij.nl
Steun Helpmij.nl! Klik hier     Computerprobleem? Klik hier!

Quote

Weergeven resultaten 1 tot 6 van 6

Onderwerp: Allen cellen met een symbool weergeven

  1. #1
    Member
    Geregistreerd
    21 september 2006
    Vraag is opgelost

    Allen cellen met een symbool weergeven

    Hallo,

    Ik heb een bestand waarin ik cellen markeer met een X in bepaalde kolommen en rijen. Zie bijlage
    Ik ben op zoek naar een mogelijkheid om, na het invullen, alleen de met de X gemarkeerde cellen te tonen, waarbij rij 1 en kolom A moeten blijven staan als de X in betreffende rij en kolom voor komt.

    De X mag overigens ook een ander symbool of letter / cijfer zijn.
    En ook graag weer een optie om alle cellen weer te tonen.

    Groet

    Visus
    Attached Files Attached Files

  2. #2
    Mega Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Met een extra kolom een het autofilter.
    Attached Files Attached Files
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  3. #3
    Mega Senior AlexCEL's avatar
    Geregistreerd
    3 april 2014
    Locatie
    Groningen
    Afstand tot server
    ±117 km
    Mogelijke oplossing met hulpkolommetje en filter.

    Edit zelfde als VenA dus.
    Attached Files Attached Files
    Laatst aangepast door AlexCEL : 12 oktober 2017 om 14:23
    -- een voorbeeldbestandje zegt meer dan 1000 woorden --

  4. #4
    Member
    Geregistreerd
    21 september 2006
    Bedankt voor de snelle reacties, maar in beide gevallen blijven de lege kolommen nog staan ?
    Deze zouden ook verborgen moeten worden, daar zat nu juist mijn "uitdaging" 'lege rijen en kolommen verbergen.

    Groet

    Visus

  5. #5
    Mega Senior AlexCEL's avatar
    Geregistreerd
    3 april 2014
    Locatie
    Groningen
    Afstand tot server
    ±117 km
    Met dezelfde hulpkolom en een aparte "samenvatting"sheet:
    Attached Files Attached Files
    -- een voorbeeldbestandje zegt meer dan 1000 woorden --

  6. #6
    Mega Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Met een macro onder een ToggleButton

    Code:
    Private Sub ToggleButton1_Click()
    Dim r As Range, j As Long, jj As Long, ar
      With ToggleButton1
        .Caption = IIf(.Value, "zichtbaar maken", "verbergen")
        ar = Cells(1).CurrentRegion
        Rows(2).Resize(UBound(ar) - 1).Hidden = .Value
        Columns(2).Resize(, UBound(ar, 2) - 1).Hidden = .Value
        If .Value Then
          For j = 2 To UBound(ar)
            For jj = 2 To UBound(ar, 2)
              If ar(j, jj) <> "" Then
                If r Is Nothing Then Set r = Cells(j, jj) Else Set r = Union(r, Cells(j, jj))
              End If
            Next jj
          Next j
          r.Rows.Hidden = False
          r.Columns.Hidden = False
        End If
      End With
    End Sub
    Attached Files Attached Files
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  7. Dit topic is automatisch gesloten omdat er sinds vier maanden niet meer op gereageerd is.

    Indien gewenst kan de topicstarter een verzoek tot heropening indienen.

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren
Aanbiedingen