Problemet er, at når excel filen er åben I forvejen, så vil jeg gerne have, at den går videre til den næste excel fil, osv osv Men som det er nu, så stopper min macro, hvis en af de forskellige excel filer er åbne I forvejen.
Håber, at der er lidt ekspert hjælp at hente herinde :-) På forhånd tak.
On Error Resume Next 'her tester du om filen er åben Application.Workbooks("blablabla.xlsm").Activate If Err.Number <> 0 Then 'Nedenstående sker hvis filen ikke er åben
Sub slet_ark() Call Mail_macro_slet_ark_er_startet Call Test_åben_blablabla End sub
Sub Test_åben_blablabla() Dim objWork As Workbook On Error Resume Next Application.Workbooks("blablabla.xlsm").Activate If Err.Number <> 0 Then Call Slet_Ark_blablabla Else Call Test_åben_blablabla1 End If End Sub
Sub Slet_Ark_blablabla() Workbooks.Open Filename:= _ "https://blablabla.xlsm" _ , UpdateLinks:=3
Range("B5:C8").Select Selection.ClearContents
ActiveWorkbook.Save ActiveWindow.Close
Call Test_åben_blablabla1 End sub
Sub Test_åben_blablabla1() Dim objWork As Workbook On Error Resume Next Application.Workbooks("blablabla1.xlsm").Activate If Err.Number <> 0 Then Call Slet_Ark_blablabla1 Else
Ah, de forskellige subs skal kaldes inden jeg lukker hver enkelt sub. Tror faktisk, at det løser en anden udfordring som jeg står med. Får lige tjekket i morgen, men mon ikke det virker? Tak til begge indtil videre og jeg melder tilbage i morgen.
Hej Jan, Macroen fejler som sådan ikke og det er yders sjældent, at andre er logget ind på det tidspunkt, hvor min macro kører. Problemet er jo, at macroen ikke kan redigere i arket, hvis der er andre brugere som har det åben til redigering på Sharepoint. Så popper der jo et vindue op, som fortæller at arket er tjekket ind af en anden bruger. Der vil jeg så gerne have min macro til, at køre videre til næste handling.
rigtig, du kan vel lave en test hvor det er åbent? hvis du så kører trinvis kan du se err.number og tilpasse så err.number hvor den stopper så springes handlingen der stopper macroen over
Den melder ikke fejl i makroen, men stopper bare og excel fortæller, at filen allerede er i brug. Hmm... er lidt lost her. Hvis jeg kører Mortens sub, så virker det når stien til filen ligger lokalt på C, men ikke når jeg ændrer stien til server adressen.
Helt ok, men tak for hjælpen alligevel. Roder lidt med, at de forskellige WB skal checke ind af sig selv, hvis de har været inaktive i noget tid. Så burde det kunne løse problemet.
Tror desværre, at jeg har prøvet den også, da jeg selv har søgt helt vildt :-) Men jeg giver det da lige et skud i morgen tidlig og melder tilbage. Tak for din store hjælpsomhed igen-igen :-)
Men skal den egentlig ikke ligge i den fil, som jeg vil åbne? Tænker, at IgnoreReadOnlyRecommended, skal ligge som workbook open i den aktuelle fil, således at den generelt ikke spørger, når den åbnes og kun er read only. Eller...
Ja, den skal ligge i den fil der: Åbner, sletter og gemmer/lukker.
Trikket skulle så være at hvis den er i brug, åbnes den skrivebeskytte (så kan den ikke gemmes) Springes over og lukkes uden at gemme Går videre med næste.
Hmm, har rodet lidt med det, men kunne simpelthen ikke få det til, at spille. Vores kære IT afdeling har dog lavet en auto tjek ind nu, så det løser jo problemet. Men sidder nu alligevel her og ærger mig over, at jeg ikke kunne løse det. Men tak for alle jeres forsøg på, at hjælpe mig.
Synes godt om
Ny brugerNybegynder
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.