inzofranken

dus feitelijk mogen vragen hieromtrent (illegaal gedoe) helemaal niet beantwoord worden toch !

gebeugen = geheugen begin eerst maar eens de laatste drivers van de website van de fabrikant te halen. Misschien dit alles direct op lost, anders kom je geen stap verder. Simpeler gezegd wil hetgeen ik zei zeggen dat jou kaart fysiek (dus echt aanwezig) maar de helft heeft van wat eerder is gezegd, als je minder geheugen hebt kan je ook minder pixels op je beeldscherm krijgen. Je kan geheugen software matig bijmaken (en dan noemt het virtueel geheugen) op harde schijf of een stukje geheugen gebruiken van het RAM geheugen wat de computer normaal gebruikt voor het besturingssysteem en voor het draaien van programma's.

Let op ! De specs zoals die gegeven zijn door Kweezie wabbit zijn voor 512Mb gebeugen , en jij hebt maar 256Mb, ik denk dat dat al een boel verklaart ! Virtual Memory is wel 512 Mb maar ik weet niet goed of dat betekent dat je dat 256 van je gewone geheugen shared danwel dat dit een geheugen shared op je harde schijf. Misschien is het instelbaar op je videokaart dat je deze sharing kan aanzetten (welke van de 2 het ook is) en dat dan de gestelde resoluties wel mogelijk zijn.

Er is dus een andere videokaart in (256MB GeForce 8600M GS), maar gaat weinig verschil uitmaken. je zou met een DVI poort wel hogere resoluties moeten kunnen halen maar die heb je niet, via HDMI kan het eventueel ook proberen maar heb je dat op je monitor? Ik zou zeker de laatste drivers van de site van Nvidia downloaden om te zien of dat soelaas brengt , als dat niet lukt dan moet ik het hier verder bij laten vrees ik. nog iemand anders suggesties?

[ATTACH]7322[/ATTACH]De MBAM (die ik overigens al een keer had laten lopen) levert geen enkele infectie op. De Hijackthis log is bijgevoegd. Maakt het niet te ingewilleld he, deze computer kan domweg geen verbinding leggen met de NAS of kan vie een thuisnetwerk geen toegang krijgen tot een andere PC , ook al staan die machtigingen juist. Simpel weg \\NAS\Root wil hij niet slikken, komt zelfs niet met een wachtwoord venster , terwijl dat op een andere laptop en vaste PC zonder problemen werkt. Datzelfde geldt voor het bereiken van de INZO-PC, dat lukt gewoon domweg niet. 'geen toegang', via de nas kan ik dat niet testen omdat ik daar uiteraard geen thuisgroep op kan zetten (maar dat hoeft ook niet) hijackthis.log

je kan Speccy even downloaden en installeren en de uitkomst posten. Er zit (waarschijnlijk) een ATi Mobility Radeon HD3470 (shared) met 256 Mb geheugen dat is heel weinig. Je beeldscherm op de laptop gaat tot 1280 x 800 pixels (15,4") en je videokaart kan maximaal tot een 17" scherm tot 1440x900 halen (via HDMI !!!). Ik vrees een beetje dat je scherm meer aan kan dan dat je laptop kan leveren. Er zullen nog wel andere posts komen van mensen die er misschien meer kaas van hebben gegeten, dus ik hoop voor je dat ik me vergis.

wat is merk en type van de laptop? Het zou best kunnen dat je videokaart niet meer aan kan.

dit is wat er in de file staat, geraak je daar aan uit ? Logfile of Trend Micro HijackThis v2.0.4 Scan saved at 18:55:37, on 26/10/2010 Platform: Windows 7 (WinNT 6.00.3504) MSIE: Internet Explorer v8.00 (8.00.7600.16671) Boot mode: Normal Running processes: C:\Program Files (x86)\Intel\Intel Matrix Storage Manager\IAAnotif.exe C:\Program Files (x86)\EgisTec\MyWinLocker 3\x86\mwlDaemon.exe C:\Windows\PLFSetI.exe C:\Program Files (x86)\Google\GoogleToolbarNotifier\GoogleToolbarNotifier.exe C:\Program Files (x86)\Windows Live\Messenger\msnmsgr.exe C:\Program Files (x86)\LG Soft India\forteManager\bin\Monitor.exe C:\Program Files (x86)\McAfee Security Scan\2.0.181\SSScheduler.exe C:\Program Files (x86)\Launch Manager\LManager.exe C:\Program Files (x86)\Microsoft Office\Office12\ONENOTEM.EXE C:\Program Files (x86)\EgisTec Egis Software Update\EgisUpdate.exe C:\Program Files (x86)\Acer Arcade Deluxe\Acer Arcade Deluxe\ArcadeDeluxeAgent.exe C:\Program Files (x86)\Internet Explorer\iexplore.exe C:\Program Files (x86)\Acer Arcade Deluxe\PlayMovie\PMVService.exe C:\Program Files (x86)\Common Files\InstallShield\UpdateService\issch.exe C:\Program Files (x86)\Common Files\ArcSoft\Connection Service\Bin\ACDaemon.exe C:\Program Files (x86)\AVG\AVG9\avgtray.exe C:\Program Files (x86)\Common Files\ArcSoft\Connection Service\Bin\ArcCon.ac C:\Program Files (x86)\Common Files\Java\Java Update\jusched.exe C:\Program Files (x86)\Internet Explorer\iexplore.exe C:\Program Files (x86)\Internet Explorer\iexplore.exe C:\Program Files (x86)\Windows Live\Contacts\wlcomm.exe C:\Program Files (x86)\Internet Explorer\iexplore.exe C:\Program Files (x86)\Windows Live\Toolbar\wltuser.exe C:\Program Files (x86)\Microsoft\Search Enhancement Pack\SCServer\SCServer.exe C:\Program Files (x86)\Common Files\Java\Java Update\jucheck.exe C:\Program Files (x86)\Trend Micro\HiJackThis\HiJackThis.exe R1 - HKCU\Software\Microsoft\Internet Explorer\Main,Default_Page_URL = iGoogle Redirect R1 - HKCU\Software\Microsoft\Internet Explorer\Main,Search Page = Bing R0 - HKCU\Software\Microsoft\Internet Explorer\Main,Start Page = startpagina.be R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Default_Page_URL = iGoogle Redirect R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Default_Search_URL = Bing R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Search Page = Bing R0 - HKLM\Software\Microsoft\Internet Explorer\Main,Start Page = iGoogle Redirect R0 - HKLM\Software\Microsoft\Internet Explorer\Search,SearchAssistant = R0 - HKLM\Software\Microsoft\Internet Explorer\Search,CustomizeSearch = R0 - HKLM\Software\Microsoft\Internet Explorer\Main,Local Page = C:\Windows\SysWOW64\blank.htm R0 - HKCU\Software\Microsoft\Internet Explorer\Toolbar,LinksFolderName = R3 - URLSearchHook: AVG Security Toolbar BHO - {A3BC75A2-1F87-4686-AA43-5347D756017C} - C:\Program Files (x86)\AVG\AVG9\Toolbar\IEToolbar.dll F2 - REG:system.ini: UserInit=userinit.exe O2 - BHO: AcroIEHelperStub - {18DF081C-E8AD-4283-A596-FA578C2EBDC3} - C:\Program Files (x86)\Common Files\Adobe\Acrobat\ActiveX\AcroIEHelperShim.dll O2 - BHO: WormRadar.com IESiteBlocker.NavFilter - {3CA2F312-6F6E-4B53-A66E-4E65E497C8C0} - C:\Program Files (x86)\AVG\AVG9\avgssie.dll O2 - BHO: (no name) - {5C255C8A-E604-49b4-9D64-90988571CECB} - (no file) O2 - BHO: Search Helper - {6EBF7485-159F-4bff-A14F-B9E3AAC4465B} - C:\Program Files (x86)\Microsoft\Search Enhancement Pack\Search Helper\SEPsearchhelperie.dll O2 - BHO: Windows Live Aanmelden - Help - {9030D464-4C02-4ABF-8ECC-5164760863C6} - C:\Program Files (x86)\Common Files\Microsoft Shared\Windows Live\WindowsLiveLogin.dll O2 - BHO: AVG Security Toolbar BHO - {A3BC75A2-1F87-4686-AA43-5347D756017C} - C:\Program Files (x86)\AVG\AVG9\Toolbar\IEToolbar.dll O2 - BHO: Google Toolbar Helper - {AA58ED58-01DD-4d91-8333-CF10577473F7} - C:\Program Files (x86)\Google\Google Toolbar\GoogleToolbar_32.dll O2 - BHO: Google Toolbar Notifier BHO - {AF69DE43-7D58-4638-B6FA-CE66B5AD205D} - C:\Program Files (x86)\Google\GoogleToolbarNotifier\5.6.5612.1312\swg.dll O2 - BHO: Java Plug-In 2 SSV Helper - {DBC80044-A445-435b-BC74-9C25C1C588A9} - C:\Program Files (x86)\Java\jre6\bin\jp2ssv.dll O2 - BHO: Windows Live Toolbar Helper - {E15A8DC0-8516-42A1-81EA-DC94EC1ACF10} - C:\Program Files (x86)\Windows Live\Toolbar\wltcore.dll O3 - Toolbar: &Windows Live Toolbar - {21FA44EF-376D-4D53-9B0F-8A89D3229068} - C:\Program Files (x86)\Windows Live\Toolbar\wltcore.dll O3 - Toolbar: RefresherBand Class - {B24BA06E-FB7B-4757-95C2-DC01125F750E} - C:\PROGRA~2\YREFRE~1\YREFRE~1.DLL O3 - Toolbar: AVG Security Toolbar - {CCC7A320-B3CA-4199-B1A6-9F516DD69829} - C:\Program Files (x86)\AVG\AVG9\Toolbar\IEToolbar.dll O3 - Toolbar: Google Toolbar - {2318C2B1-4965-11d4-9B18-009027A5CD4F} - C:\Program Files (x86)\Google\Google Toolbar\GoogleToolbar_32.dll O4 - HKLM\..\Run: [LManager] C:\Program Files (x86)\Launch Manager\LManager.exe O4 - HKLM\..\Run: [EgisTecLiveUpdate] "C:\Program Files (x86)\EgisTec Egis Software Update\EgisUpdate.exe" O4 - HKLM\..\Run: [NortonOnlineBackupReminder] "C:\Program Files (x86)\Symantec\Norton Online Backup\Activation\NobuActivation.exe" UNATTENDED O4 - HKLM\..\Run: [ArcadeDeluxeAgent] "C:\Program Files (x86)\Acer Arcade Deluxe\Acer Arcade Deluxe\ArcadeDeluxeAgent.exe" O4 - HKLM\..\Run: [PlayMovie] "C:\Program Files (x86)\Acer Arcade Deluxe\PlayMovie\PMVService.exe" O4 - HKLM\..\Run: [iSUSScheduler] "C:\Program Files (x86)\Common Files\InstallShield\UpdateService\issch.exe" -start O4 - HKLM\..\Run: [ArcSoft Connection Service] C:\Program Files (x86)\Common Files\ArcSoft\Connection Service\Bin\ACDaemon.exe O4 - HKLM\..\Run: [AVG9_TRAY] C:\PROGRA~2\AVG\AVG9\avgtray.exe O4 - HKLM\..\Run: [sunJavaUpdateSched] "C:\Program Files (x86)\Common Files\Java\Java Update\jusched.exe" O4 - HKLM\..\Run: [Adobe Reader Speed Launcher] "C:\Program Files (x86)\Adobe\Reader 9.0\Reader\Reader_sl.exe" O4 - HKLM\..\Run: [Adobe ARM] "C:\Program Files (x86)\Common Files\Adobe\ARM\1.0\AdobeARM.exe" O4 - HKCU\..\Run: [swg] "C:\Program Files (x86)\Google\GoogleToolbarNotifier\GoogleToolbarNotifier.exe" O4 - HKCU\..\Run: [msnmsgr] "C:\Program Files (x86)\Windows Live\Messenger\msnmsgr.exe" /background O4 - HKCU\..\Run: [sidebar] C:\Program Files\Windows Sidebar\sidebar.exe /autoRun O4 - HKCU\..\Run: [iSUSPM Startup] C:\PROGRA~2\COMMON~1\INSTAL~1\UPDATE~1\isuspm.exe -startup O4 - HKUS\S-1-5-19\..\Run: [sidebar] %ProgramFiles%\Windows Sidebar\Sidebar.exe /autoRun (User 'LOCAL SERVICE') O4 - HKUS\S-1-5-19\..\RunOnce: [mctadmin] C:\Windows\System32\mctadmin.exe (User 'LOCAL SERVICE') O4 - HKUS\S-1-5-20\..\Run: [sidebar] %ProgramFiles%\Windows Sidebar\Sidebar.exe /autoRun (User 'NETWORK SERVICE') O4 - HKUS\S-1-5-20\..\RunOnce: [mctadmin] C:\Windows\System32\mctadmin.exe (User 'NETWORK SERVICE') O4 - Startup: OneNote 2007 Schermopname en Snel starten.lnk = C:\Program Files (x86)\Microsoft Office\Office12\ONENOTEM.EXE O4 - Global Startup: forteManager.lnk = ? O4 - Global Startup: McAfee Security Scan Plus.lnk = ? O8 - Extra context menu item: E&xport to Microsoft Excel - res://C:\PROGRA~2\MICROS~1\Office12\EXCEL.EXE/3000 O8 - Extra context menu item: Google Sidewiki... - res://C:\Program Files (x86)\Google\Google Toolbar\Component\GoogleToolbarDynamic_mui_en_89D8574934B26AC4.dll/cmsidewiki.html O9 - Extra button: In weblog opnemen - {219C3416-8CB2-491a-A3C7-D9FCDDC9D600} - C:\Program Files (x86)\Windows Live\Writer\WriterBrowserExtension.dll O9 - Extra 'Tools' menuitem: &In weblog opnemen met Windows Live Writer - {219C3416-8CB2-491a-A3C7-D9FCDDC9D600} - C:\Program Files (x86)\Windows Live\Writer\WriterBrowserExtension.dll O9 - Extra button: Send to OneNote - {2670000A-7350-4f3c-8081-5663EE0C6C49} - C:\PROGRA~2\MICROS~1\Office12\ONBttnIE.dll O9 - Extra 'Tools' menuitem: S&end to OneNote - {2670000A-7350-4f3c-8081-5663EE0C6C49} - C:\PROGRA~2\MICROS~1\Office12\ONBttnIE.dll O9 - Extra button: Research - {92780B25-18CC-41C8-B9BE-3C9C571A8263} - C:\PROGRA~2\MICROS~1\Office12\REFIEBAR.DLL O16 - DPF: {E2883E8F-472F-4FB0-9522-AC9BF37916A7} - http://platformdl.adobe.com/NOS/getPlusPlus/1.6/gp.cab O18 - Protocol: avgsecuritytoolbar - {F2DDE6B2-9684-4A55-86D4-E255E237B77C} - C:\Program Files (x86)\AVG\AVG9\Toolbar\IEToolbar.dll O18 - Protocol: linkscanner - {F274614C-63F8-47D5-A4D1-FBDDE494F8D1} - C:\Program Files (x86)\AVG\AVG9\avgpp.dll O23 - Service: ArcSoft Connect Daemon (ACDaemon) - ArcSoft Inc. - C:\Program Files (x86)\Common Files\ArcSoft\Connection Service\Bin\ACService.exe O23 - Service: @%SystemRoot%\system32\Alg.exe,-112 (ALG) - Unknown owner - C:\Windows\System32\alg.exe (file missing) O23 - Service: AVG Security Toolbar Service - Unknown owner - C:\Program Files (x86)\AVG\AVG9\Toolbar\ToolbarBroker.exe O23 - Service: AVG Free E-mail Scanner (avg9emc) - AVG Technologies CZ, s.r.o. - C:\Program Files (x86)\AVG\AVG9\avgemc.exe O23 - Service: AVG Free WatchDog (avg9wd) - AVG Technologies CZ, s.r.o. - C:\Program Files (x86)\AVG\AVG9\avgwdsvc.exe O23 - Service: @%SystemRoot%\system32\efssvc.dll,-100 (EFS) - Unknown owner - C:\Windows\System32\lsass.exe (file missing) O23 - Service: Acer ePower Service (ePowerSvc) - Acer Incorporated - C:\Program Files\Acer\Acer ePower Management\ePowerSvc.exe O23 - Service: @%systemroot%\system32\fxsresm.dll,-118 (Fax) - Unknown owner - C:\Windows\system32\fxssvc.exe (file missing) O23 - Service: GRegService (Greg_Service) - Acer Incorporated - C:\Program Files (x86)\Acer\Registration\GregHSRW.exe O23 - Service: Google Updateservice (gupdate) (gupdate) - Google Inc. - C:\Program Files (x86)\Google\Update\GoogleUpdate.exe O23 - Service: Google Software Updater (gusvc) - Google - C:\Program Files (x86)\Google\Common\Google Updater\GoogleUpdaterService.exe O23 - Service: Intel® Matrix Storage Event Monitor (IAANTMON) - Intel Corporation - C:\Program Files (x86)\Intel\Intel Matrix Storage Manager\IAANTMon.exe O23 - Service: @keyiso.dll,-100 (KeyIso) - Unknown owner - C:\Windows\system32\lsass.exe (file missing) O23 - Service: McAfee Security Scan Component Host Service (McComponentHostService) - McAfee, Inc. - C:\Program Files (x86)\McAfee Security Scan\2.0.181\McCHSvc.exe O23 - Service: @comres.dll,-2797 (MSDTC) - Unknown owner - C:\Windows\System32\msdtc.exe (file missing) O23 - Service: MyWinLocker Service (MWLService) - Egis Technology Inc. - C:\Program Files (x86)\EgisTec\MyWinLocker 3\x86\\MWLService.exe O23 - Service: @%SystemRoot%\System32\netlogon.dll,-102 (Netlogon) - Unknown owner - C:\Windows\system32\lsass.exe (file missing) O23 - Service: NTI Backup Now 5 Backup Service (NTIBackupSvc) - NewTech InfoSystems, Inc. - C:\Program Files (x86)\NewTech Infosystems\NTI Backup Now 5\BackupSvc.exe O23 - Service: NTI Backup Now 5 Scheduler Service (NTISchedulerSvc) - NewTech Infosystems, Inc. - C:\Program Files (x86)\NewTech Infosystems\NTI Backup Now 5\SchedulerSvc.exe O23 - Service: @%systemroot%\system32\psbase.dll,-300 (ProtectedStorage) - Unknown owner - C:\Windows\system32\lsass.exe (file missing) O23 - Service: @%systemroot%\system32\Locator.exe,-2 (RpcLocator) - Unknown owner - C:\Windows\system32\locator.exe (file missing) O23 - Service: @%SystemRoot%\system32\samsrv.dll,-1 (SamSs) - Unknown owner - C:\Windows\system32\lsass.exe (file missing) O23 - Service: @%SystemRoot%\system32\snmptrap.exe,-3 (SNMPTRAP) - Unknown owner - C:\Windows\System32\snmptrap.exe (file missing) O23 - Service: @%systemroot%\system32\spoolsv.exe,-1 (Spooler) - Unknown owner - C:\Windows\System32\spoolsv.exe (file missing) O23 - Service: @%SystemRoot%\system32\sppsvc.exe,-101 (sppsvc) - Unknown owner - C:\Windows\system32\sppsvc.exe (file missing) O23 - Service: @%SystemRoot%\system32\ui0detect.exe,-101 (UI0Detect) - Unknown owner - C:\Windows\system32\UI0Detect.exe (file missing) O23 - Service: Updater Service - Acer - C:\Program Files\Acer\Acer Updater\UpdaterService.exe O23 - Service: @%SystemRoot%\system32\vaultsvc.dll,-1003 (VaultSvc) - Unknown owner - C:\Windows\system32\lsass.exe (file missing) O23 - Service: @%SystemRoot%\system32\vds.exe,-100 (vds) - Unknown owner - C:\Windows\System32\vds.exe (file missing) O23 - Service: @%systemroot%\system32\vssvc.exe,-102 (VSS) - Unknown owner - C:\Windows\system32\vssvc.exe (file missing) O23 - Service: @%SystemRoot%\system32\Wat\WatUX.exe,-601 (WatAdminSvc) - Unknown owner - C:\Windows\system32\Wat\WatAdminSvc.exe (file missing) O23 - Service: @%systemroot%\system32\wbengine.exe,-104 (wbengine) - Unknown owner - C:\Windows\system32\wbengine.exe (file missing) O23 - Service: @%Systemroot%\system32\wbem\wmiapsrv.exe,-110 (wmiApSrv) - Unknown owner - C:\Windows\system32\wbem\WmiApSrv.exe (file missing) O23 - Service: @%PROGRAMFILES%\Windows Media Player\wmpnetwk.exe,-101 (WMPNetworkSvc) - Unknown owner - C:\Program Files (x86)\Windows Media Player\wmpnetwk.exe (file missing) -- End of file - 13351 bytes

Dat is al gebeurd !!!! Alles staat automatisch uitgelijnd verticaal en horizontaal, kijk maar bij de paginainstellingen ;-)

EXCEL 2002? mmmmm, zou kunnen dat hij er dan wat problemen mee heeft. Ik heb nu in de laatste post wel een ander commando gestoken, misschien dat hij dat wel wil begrijpen. In OFFICE 2007 gaat het zeker werken (werk ik ook mee).

[ATTACH]7278[/ATTACH]Ik heb het printcommando aangepast, heb het hier getest, werkt prima. Je moet wel even controleren dat je standaard printer ook daadwerkelijk een printer is en niet een PDF-writer of iets anders. Kaart Kaarting.xls

Daarvoor is foutafvanging dus erg belangrijk , ik zal een andere instructie in de makro steken, zou kunnen dat jouw excel versie de EXCEL4 commando's niet meer ondersteunt. ik zal zo een aangepaste versie posten.

Geen probleem, test het eerste even met de kaartjes van 1 tot en met 6 dan komt er maar 1 papier uit de printer. Je kan daarna 1 tot 3500 invullen en dan zal hij 583 pagina's gaan afdrukken !!!!! het is dus best dat je dit in stukken doet, je moet al een flinke printer hebben die zoveel papier in één keer kan verwerken zonder dat je tussendoor moet bijvullen. Dat gaat dus nu heel eenvoudig, eerst van 1 tot 600 en dan van 601 tot 1200 etc. etc. Gaat er iets fout bij het printen dan stel je het bereik gewoon in op de kaartjes die je nog moet hebben. Ben benieuwd of het gelukt is.

secondje, met het nalezen van de makro zie ik dat ik een klein rekenfoutje gemaakt heb ;-), ik zal zo een nieuwe invoegen 21:15 Heb bovenstaande zojuist aangepast en is nu correct, probeer het eens uit ?

[ATTACH]7277[/ATTACH] Voila, in bijlage het excel bestandje met de makro, Het enige wat jij nog moet doen is zoals eerder uitgelegd de 4 stappen te doen zoals ik eerder heb opgeschreven. Ik heb het hier getest en werkt prima. Ik zou wel eerst even testen op een klein bereik van 1 tot 12 of zo zodat je niet onmiddelijk met 100 pagina's papier zit. Noot : je hoeft niet in eenheden van 6 te rekenen hoor, programma doet dat wel voor je. Let wel op dat na het afdrukken de door jou ingevoerde waarden zijn overschreven. Ik hoop dat dit allemaal duidelijk voor je is. Het kan zijn dan je huidige excel Makro's blokkeert, ik heb hem dan ook nog even bewust opgeslagen in EXCEL 2003 maar 2007kan er ook over vallen. Als je niet weet hoe je dit (tijdelijk) kan omzeilen geef dat dan maar even aan dan leg ik dat wel uit. Ik heb niet ingebouwd in makro wat niet mag (heb geen kwade bedoelingen ) onderstaande zit er in. Programmeren is op zich niet moeilijk , de meeste tijd kruipt in het afvangen van mogelijke fouten. Enfin, je moet onderstaande niet begrijpen , het kan ook nog we wat slimmer, maar ik moest dit even snel in elkaar steken , quick and dirty zullen we maar zeggen. Sub start_print() 'zoek start en eindeveld conflict = False On Error GoTo F1 Application.Goto Reference:="STARTNUMMER": enk = ActiveCell.Column: enr = ActiveCell.Row enw = CLng(ActiveCell) Application.Goto Reference:="EINDENUMMER": lnk = ActiveCell.Column: lnr = ActiveCell.Row lnw = CLng(ActiveCell) 'lnw bevat het laatste nummer 'enw bevat het eerste nummer 'de A4 bevat altijd 6 opvolgende nummers ook al overstijgt dit het laatste nummer !!!! If conflict = True Then dmy = MsgBox("Controleer de ingevoerde gegevens, er gaat iets fout!!!", vbCritical, "Foutieve ingave"): Exit Sub dmy = MsgBox("Wilt U alle kaartjes met nummer " + CStr(enw) + " tot nummer " + CStr(lnw) + " afdrukken?", vbQuestion + vbYesNo + vbDefaultButton2, "Afdrukken") If dmy = vbNo Then Exit Sub aantal_a4 = 0 While enw < lnw 'plaatsen van de juiste waarden op het blad Cells(enr, enk) = enw Cells(lnr, lnk) = enw + 5 'de ingevoerde waarde wordt overschreven ivm de print 'printcommando conflict = False On Error GoTo F1 'MsgBox ("print " + CStr(enw)) ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)" If conflict = True Then dmy = MsgBox("Er gaat iets fout bij het printen, wilt U de bewerking afbreken?", vbYesNo + vbDefaultButton1 + vbCritical, "Fout") If dmy = vbYes Then Exit Sub End If End If enw = enw + 6 aantal_a4 = aantal_a4 + 1 Wend dmy = MsgBox("Er zijn in totaal " + CStr(aantal_a4) + " prints gemaakt.", vbInformation, "Gereed") Exit Sub F1: conflict = True Resume Next End Sub Kaart Kaarting.xls