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

Quote

Weergeven resultaten 1 tot 12 van 12

Onderwerp: Rij toevoegen zonder daar de beveiliging vanaf te halen.

  1. #1
    Junior Member
    Geregistreerd
    14 september 2018
    Vraag is niet opgelost

    Rij toevoegen zonder daar de beveiliging vanaf te halen.

    Bijlage 329652

    Hallo allemaal,

    Bijgevoegd een capaciteitsplanning die ik in elkaar heb geknutseld.
    Als ik de beveiliging er af laat kan ik bijvoorbeeld in rij 20 iets nieuws typen en dan neemt excel automatisch de opmaak en formules mee over.
    Zodra ik het werkblad beveilig kan ik géén nieuwe rij meer toevoegen.

    Heeft iemand hier een oplossing voor?
    Het is uiteindelijk wel de bedoeling dat de filter gebruikt kan worden door iedereen.

    Alvast bedankt.

  2. #2
    Dat gaat niet samen, dus is een macrootje nodig. Iets als dit:

    Code:
    Sub NieuweRegel()
        ActiveSheet.Unprotect "Wachtwoord"
        With ActiveSheet.ListObjects(1).ListRows.Add
            .Range.Cells(1, 1).Select
        End With
        ActiveSheet.Protect "Wachtwoord"
    End Sub
    Groetjes,

    Jan Karel Pieterse
    Excel MVP jkp-ads.com

  3. #3
    Junior Member
    Geregistreerd
    14 september 2018
    Super! Bedankt voor de info.

  4. #4
    Junior Member
    Geregistreerd
    14 september 2018
    Toch nog even een vraagje.
    Zodra ik macro is uitgevoerd (dus een rij is toegevoegd).
    Kan ik de filter knopjes niet meer gebruiken.
    Deze zijn dan op één of andere manier toch weer beveiligd.
    Weet je toevallig hoe dat kan?

  5. #5
    bij de protect methode horen meer argumenten. bekijk die maar eens in help...
    Groetjes,

    Jan Karel Pieterse
    Excel MVP jkp-ads.com

  6. #6
    Junior Member
    Geregistreerd
    14 september 2018
    Hoi Jan Karel,

    Via deze link https://docs.microsoft.com/nl-nl/off...ksheet.protect
    Heb ik gekeken welke ik zou moeten hebben.
    Ik denk zelf: "AllowSorting" en "Allowfiltering"
    Maar wat voor code heb je hier dan voor nodig? Die krijg ik zo niet gevonden.

  7. #7
    Giga Senior Haije's avatar
    Geregistreerd
    24 maart 2009
    Locatie
    Oldenzaal
    Afstand tot server
    ±97 km
    hospelino,

    zet de macrorecorder eens aan en zet dan met de hand de beveiliging aan zoals die moet worden
    stip de macrorecorder en bekijk de opgenomen code
    Haije
    ___________________________________________________

  8. #8
    Junior Member
    Geregistreerd
    14 september 2018
    Hoi Haije,

    Het is me eindelijk gelukt.
    Voor mij als leek viel het allemaal niet erg mee.
    Maar ik ben blij dat het met behulp van jullie toch is gelukt.

    Bedankt allemaal.

    Wie weet zal het nog wel ooit een keer "gefinetuned" moeten worden.

    Maar voorlopig kunnen we hier wel mee aan slag.

    Nogmaals Dank!!!

  9. #9
    Giga Senior Haije's avatar
    Geregistreerd
    24 maart 2009
    Locatie
    Oldenzaal
    Afstand tot server
    ±97 km
    hospelino,

    fijn dat het gelukt is! Door zoiets eens te doen leer je veel meer dan door het alleen maar over te nemen van iemand.

    Markeer je het bericht nog even als "opgelost"?
    Haije
    ___________________________________________________

  10. #10
    Giga Honourable Senior Member
    Geregistreerd
    2 maart 2013
    Als je gebruik maakt van het linkje dat je gevonden hebt dan kan je het ook zo schrijven.

    Code:
    Sub NieuweRegel()
      ActiveSheet.Unprotect "Wachtwoord"
      With ActiveSheet.ListObjects(1)
        .ListRows.Add
        .Range(.ListRows.Count + 1, 1).Select
      End With
      ActiveSheet.Protect "Wachtwoord", , , , , , , , , , , , , True, True
    End Sub
    Laatst aangepast door VenA : 27 november 2018 om 18:32
    Je kan een paard naar het water leiden, maar je kan het niet dwingen te drinken.

  11. #11
    Junior Member
    Geregistreerd
    14 september 2018
    Beste allemaal,

    Om nog even terug te komen op bovenstaande oplossing.
    Een rij toevoegen met behulp van een knop waar een VBA aan gekoppeld zit, werkt perfect.
    Echter hebben we nu Office 365 waarbij het document opgeslagen staat in de One Drive Cloud.

    We kunnen dus nu met meerdere personen tegelijk aan dit document werken.
    Het levert nu wel een probleem op.

    Wanneer persoon A en B tegelijk in dit document werken verloopt nog alles prima.
    Als persoon A een regel wilt toevoegen wordt bij persoon A een regel toegevoegd zonder foutmeldingen maar neemt de formules niet mee.
    Persoon B krijgt dan bij de toegevoegde regel enkele cellen te zien van #WAARDE

    Bij persoon B staat ook in eens een hele andere benaming in de formule.

    Waar zou dit aan kunnen liggen?

  12. #12
    Wat bedoel je met een andere benaming in de formule? Dat de synchronisatie niet lekker gaat snap ik, de beveiliging wordt er bij A afgehaald, maar na invoegen rij meteen weer opgezet, mogelijk is -als Excel dan synchroniseert bij B- de beveiliging er niet (meer) af? Weglaten van de beveiliging is in dit geval dan de enige oplossing denk ik.
    Groetjes,

    Jan Karel Pieterse
    Excel MVP jkp-ads.com

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