Hvis man har et ark med nogle celler til udfyldning - er der så en mulighed for at at indsætte en knap, hvor man kan slette det indtastede i alle celler, uden at formler slettes?
Ok. Er ikke ekspert, men som du selv er inde på så er det sikkert en makro der skal køres. For at andre bedre kan hjælpe med sådan en så oplys hvilke celler der skal nulstilles med denne makro
Højreklik på det ark data ligger i og vælg "vis programkode". kopier og indsæt Sub sbClearCellsOnlyData() Range("C5:D5:E5:G8:G11:G14:G17").ClearContents End Sub i feltet. Indtast data i de felter du vil have den sletter. Gå i vis-Makroer-vis makro. Tryk på afspil macro. Forsvinder data i dine felter spå?
Har lavet dette simple ark med data i de nævnte felter. Når man trykker på knappen "slet" forsvinder data i felter. http://www.filedropper.com/test_142
For at få knap på dit ark skal der øverst i vindue være et felt der hedder "udvikler". Du er nødt til at have denne for at oprette dette kontrolelement (knap). Du skal derfor i filer-indstillinger-tilpas båndet og til højre få udvikler tjekket af hvis den ikke er det. Gå herefter ud og tryk gem Når dette er gjort tryk på udvikler og tryk indsæt. Øverst her er kontrolelementer til formular og yderst til vensrte er knap som du vælger og lægger den udenfor dit udskrivningsområde i arket den skal køre i. Du kan omdøbe denne knap som du har lyst til ved at højreklikke på den og vælge rediger tekst. Du kan også her tildele makro med højreklik på knap ved at trykke på tildel makro og pege på den makro jeg har beskrevet. Når dette er gjort tryk på gem.
Indtast data i dit prøveark, og prøv så at trykke på din knap. Forsvinder data så som det ønskes?
Klik på fanen: Filer --> Indstillinger --> Tilpas båndet Over til højre: Hovedfaner --> Sæt flueben ved: Udvikler --> Tryk Ok
2. Lav en knap.
Klik på fanen: Udvikler --> Indsæt --> Kommandoknap (ActiveX-objekt) Ude i regnearket --> peg et sted med musen --> klik og hold venstre knap nede --> træk skråt nedad og slip knappen (Vupti.....Du har en knap)
3. Indsæt kode på knappen.
Kopier denne kode: Range("C5:E5,G8,G11,G14,G17").ClearContents I regnearket klik på fanen: Udvikler --> klik på: Designtilstand --> dobbelt klik på din knap.
Et kode vindue kommer frem, og der står:
Private Sub CommandButton1_Click()
End Sub
Tilføj koden med: Ctrl + V
Private Sub CommandButton1_Click() Range("C5:E5,G8,G11,G14,G17").ClearContents End Sub
Du skal gemme med aktive makroer ;-) Når du gemmer, skal du lige under hvor du skriver filnavn, i Fil type vælge: Excel-projektmappe med aktive makroer
Jeg må sige det driller, mit excel er på en MACbook, men er en ny version, dog er der ikke noget der hedder Active x, designtilstand, excelmappe med aktive makroer, men sikkert mig der ikke lige forstår det. Jeg har aldrig arbejdet med makroer
Makroen ''Slet alt.xlsm'!CommandButton1_Klik' kan ikke køres. Makroen er måske ikke tilgængelig i denne projektmappe, eller alle makroer er deaktiveret.
Denne projektmappe har indhold, der ikke understøttes i denne version af Excel.
Hvis du vil have vist filens ikke-understøttede indhold, kan du åbne projektmappen som skrivebeskyttet. Men hvis du ændrer og derefter gemmer projektmappen, gemmes ikke-understøttet indhold ikke.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.