CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede Kenneth Kirsgart Juniormester
01. april 2019 - 10:55 Der er 2 kommentarer og
1 løsning

Tøm skabelon

Hej

Jeg har et stort excel ark, der er udformet som skabelon til at kunne indtaste en masse vikar data. (Arbejdsrelateret)

Dette skal jeg oprette en makro til at tømme.

Hvordan gør jeg dette nemmest? Jeg ville have markeret kolonnerne ned ad, og kun have datafelterne åbne, men jeg får ikke lov til at slette da de andre felter er låste.

Pft
Avatar billede Jan Hansen Ekspert
01. april 2019 - 11:12 #1
Hej noget alla

Sub slet()
Dim rArea as Range,rCell as Range
set rArea=range("A1:Q200") 'Q200 er sidste celle
for each rCell in rArea
    if rCell.Locked=False Then
      rCell=""
  end if
next
end sub

ej testet

Jan
Avatar billede Kenneth Kirsgart Juniormester
01. april 2019 - 11:23 #2
Hej Jan

Mange tak,

Det fungerer, men er noget tung. Ved du om det er muligt at navngive området og så lave makroen til at markerer navngivet område og rydde indhold? Ellers bruger jeg den løsning du har sendt :)
Avatar billede Jan Hansen Ekspert
01. april 2019 - 11:57 #3
prøv

Sub slet()
Dim rArea as Range,rCell as Range
dim app as Application
set app=Application
app.ScreenUpdating=false
set rArea=range("A1:Q200") 'Q200 er sidste celle
for each rCell in rArea
    if rCell.Locked=False Then
      rCell=""
  end if
next
app.ScreenUpdating=true
end sub

virker nogle gange hastigheds forberedende

Jan
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Excel kurser
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre nuller til ovenstående tekst Af boro23 i Excel 4 20/11/202410:44 20/11/202412:08
HVIS med datoer Af HHA i Excel 6 20/11/202408:31 20/11/202412:51
Numerisk liste Af AND i Excel 8 19/11/202414:05 19/11/202423:31
Ændre nuller til ovenstående tal Af boro23 i Excel 3 19/11/202409:39 19/11/202411:51
Addition af celler, som er formatteret "tt.mm" Af FinBalance i Excel 5 18/11/202414:14 19/11/202414:11
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 08:08 touchpad virker ikke Af Malm i PC
I går 22:45 Mangler jeg nogen driver?? Af xMsBx i Andet software
I går 20:37 Åbne en regnskabsfil fra Summasumarum Af ptj_11 i Økonomiprogrammer
I går 18:03 Kan en kombinationsbox formateres om til en text box og omvendt Af per2edb i Access
I går 12:41 Standard kontoplan til dynamics business central Af prof2004 i Økonomiprogrammer
White papers
Flere white papers »


Premium
Teaser billede
Kombit vil købe it-konsulenter for 140 millioner kroner - her er planen
Læs mere »
TDC's cyberchef skyder med skarpt mod trusselsvurderingerne: De bygger alt for ofte på forældede data
Københavns Kommune ansætter sin første CISO nogensinde: Skal bygge it-afdelingen op omkring 45.000 ansatte
Ny EU-sikkerhedslov er offentliggjort: Nu er nedtællingen i gang
Se alle »
Computerworld
Teaser billede
Microsofts nye pc er ekstrem billig – men kan blive ekstrem sikker og fleksibel
Læs mere »
Test: Audi Q6 er en super fed SUV - men gør dig selv en tjeneste og kast flere penge efter den
Det vrimler frem med gratis-alternativer til ChatGPT Plus – her er de bedste af dem
Test: Prøv kun disse B&O-hovedtelefoner, hvis du har råd
Se alle »
CIO
Teaser billede
Konsulenthus vil rulle Microsoft 365 Copilot ud til 200.000 ansatte
Læs mere »
Danske sygehuse når ikke at opgradere tusindvis af computere til Windows 11 i tide: Får konsekvenser for it-sikkerheden
Kæmpe-opgave for Danske Bank har banet vej for fuldautomatiseret migrering til cloud: Nu udbredes metoden i hele AWS
Stor sag mod Microsoft kan være på vej: Beskyldes for at låse Azure-kunder fast med ulovlige metoder
Se alle »
Job & Karriere
Teaser billede
Microsoft klar med ny direktion for den danske forretning: Her er de nye direktører
Læs mere »
Tre Norlys-topchefer fratræder med omgående virkning: Internet-forretningen er udfordret - vil have mere fart i integrationen af Telia Danmark
Efter skelsættende møde med sportscoach: Stor dansk it-arbejdsplads indfører fredags-fri og isbade i arbejdstiden
Linus Torvalds giver russiske Linux-udviklere sparket: Vil ikke have noget med dem at gøre
Se alle »
White paper
Teaser billede
Governance, Risk & Compliance: Knyt stærke bånd mellem forretning og sikkerhed
Læs mere »
Sådan får du overblik og beskytter dine cloudapplikationer
SMB og cybertrusler: Brug sikkerhedsressourcerne optimalt
Sæt turbo på din cloudperformance og minimér risikoen for DDoS-angreb
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »