Door
joker15,
in Archief Windows Algemeen
-
Welkom op PC Helpforum
-
-
Leden statistieken
-
Gerelateerde inhoud
-
Door Gast
Ik heb gisteren eenn beveiliging van,
Microsoft Security Essentials gedownload
en geinst.
Weet iemand hier iets van.
-
Door CaptainRexCC
Games die mijn PC makkelijk aankan, crashen na een willekeurige tijd met de error LiveKernelEvent 141. Dit zijn alle details in het crashreport:
Problem Event Name: LiveKernelEvent
Code: 141
Parameter 1: ffff9c06041df010
Parameter 2: fffff80340d4c188
Parameter 3: 0
Parameter 4: 1ab0
OS version: 10_0_19042
Service Pack: 0_0
Product: 256_1
OS Version: 10.0.19042.2.0.0.256.48
Locale ID: 1033
Ik speel op een windows 10 pc die altijd up-to-date is, en mijn games zeggen vaak dat ik mijn videodrivers moet updaten, terwijl ik dat al de hele tijd doe. Ik heb dit probleem al drie jaar, kan iemand mij helpen?
-
Door Joseph Van den Avont
Ik heb onlangs een pc via 2dehands.be en heb al meerdere keer met mijn bootable windows usb stick windows te installeren, maar steeds kom ik bij onderstaande scherm terecht bij het instellen van Windows. Dit vraagt om in te loggen met een email van dit bedrijf. Mijn vraag is, hoe kan ik dit omzeilen?
Vriendelijke groeten,
Joseph
-
Door bennieboef
Hallo Allemaal,
Mijn macro zoekt in een windows map op de volgende manier : "prd." + <cell value> + ".dld"
Het probleem is dat er niet wordt gezocht in inderliggende bmappen
Hier de macro :
Option Explicit
Sub Find_DLD()
Dim AckTime As Integer, InfoBox As Object
Dim iRow As Integer ' ROW COUNTER.
Dim sSourcePath As String, currentpath As String
Dim sDestinationPath As String
Dim sFileType As String
Dim sFileType1 As String
Dim bContinue As Boolean
bContinue = True
iRow = 2
' THE SOURCE AND DESTINATION FOLDER WITH PATH.
sSourcePath = "S:"
sFileType = ".dld" ' TRY WITH OTHER FILE TYPES LIKE ".pdf".
sFileType1 = "prd."
' LOOP THROUGH COLUMN "B" TO PICK THE FILES.
While bContinue
If Len(Range("E" & CStr(iRow)).Value) = 0 Then ' DO NOTHING IF THE COLUMN IS BLANK.
Set InfoBox = CreateObject("WScript.Shell")
AckTime = 1
Select Case InfoBox.Popup("Klaar.", _
AckTime, "Hieperdepiep", 0)
Case 1, -1
Exit Sub
End Select
Else
' CHECK IF FILES EXISTS.
If Len(Dir(sSourcePath & sFileType1 & Range("E" & CStr(iRow)).Value & sFileType)) = 0 Then
Range("F" & CStr(iRow)).Value = "Geen kantprogramma"
Range("F" & CStr(iRow)).Font.Bold = True
Else
Range("F" & CStr(iRow)).Value = "Kantprogramma bestaat!"
Range("F" & CStr(iRow)).Font.Bold = False
End If
End If
iRow = iRow + 1 ' INCREMENT ROW COUNTER.
Wend
End Sub
Het zou fantastisch zijn al iemand deze code zo kan aanpassen dat de macro ook in de onderliggende mappen van s:\ gaat zoeken.
Alvast bedankt voor jullie hulp.
Bijlage : bestand met macro.
Controle dxf + kantprogramma.xlsm
-
Door Nicole ABbenes
Leuke mensen!
Graag gebruik ik een externe koppeling naar een andere werkmap. Er treedt echter een #REF! fout op in de doelwerkmap die de koppelingen bevat. Dit lost zich op wanneer ik de bronwerkmappen open. Ik zou graag de doelwerkmap openen zonder foutcodes, zonder de bronwerkmappen te hoeven openen. Hoe krijg ik dit voor elkaar?
-
Aanbevolen berichten