Ga naar inhoud

Welkom op PC Helpforum!
PC Helpforum helpt GRATIS computergebruikers sinds 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!

dotchiejack

Lid
  • Aantal items

    65
  • Registratiedatum

  • Laatst bezocht

Over dotchiejack

  • Titel
    Geregeld Bezoeker
  • Verjaardag 30-05-1961

Profiel Informatie

  • Geslacht
    Man
  • Land
    België

PC Ervaring

  • PC Ervaring
    Professionele Kennis

Recente bezoekers van dit profiel

De recente bezoekers block is uitgeschakeld en zal niet meer getoond worden aan gebruikers.

  1. dotchiejack

    VBA om datums te sorteren volgens dag en maand

    Een andere benadering. (als vb zijn er morgen drie jarig) Verjaardagen.xlsm
  2. dotchiejack

    Wise Care

    @porrelaar Leuk artikel, trimmen van een SSD.
  3. dotchiejack

    Wise Care

    Via dit tooltje kan je zien wat er allemaal in je pc zit. Link Post eventueel de resultaten hier. Edit: download de gratis versie.
  4. dotchiejack

    Macro start mee op als ik werkmap open

    Dank voor de terugkoppeling. Graag gedaan,blij dat het opgelost is..😄
  5. dotchiejack

    Macro start mee op als ik werkmap open

    Ergens is iets fout gegaan. Wat denk je emielDS, komt hiermee de aap uit de mouw?
  6. dotchiejack

    Macro start mee op als ik werkmap open

    @emielDS
  7. dotchiejack

    Macro start mee op als ik werkmap open

    Die heb je zelf gepost 7 uren geleden (postje #4)
  8. dotchiejack

    Macro start mee op als ik werkmap open

    Vervang de vorige macro's met deze Sub Namen_Sorteren() ' ' Namen_Sorteren Macro ' Map sorteren op naam ' ' Sneltoets: Ctrl+n ' With Worksheets("Per Maand").Sort .SortFields.Clear .SortFields.Add Key:=Range("B2:B70"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .SetRange Range("A1:L70") .Header = xlYes .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End Sub Sub Maanden_Sorteren() ' ' Maanden_Sorteren Macro ' Leden sorteren volgens geboorte maand ' ' Sneltoets: Ctrl+m With Worksheets("Per Maand").Sort .SortFields.Clear .SortFields.Add Key:=Range("L2:L70"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal .SetRange Range("A1:L70") .Header = xlYes .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End Sub Staat er in de gewone module iets met Auto Open? Wat staat er in de ThisWorkbook module?
  9. dotchiejack

    Macro start mee op als ik werkmap open

    Waar staan deze macro's? Als ze in de module ThisWorkbook Private Sub Workbook_Open()staan of in een gewone module Private Sub auto_open() staan zullen ze inderdaad opstarten bij het openen van je bestand. Post eens een vb bestandje of de macro's. Gezien de macro's zijn opgenomen zullen er een hoop overbodige lijnen code in staan.
  10. Hoi Jean Paul, Ik heb begrepen dat VBA nieuw is. Zonder dat je iets moet veranderen in de VBA. Het bestandje Analyse kan je plaatsen waar je wilt. (BV op uw bureaublad ) Maak een map aan op uw C schijf, noem die map Analyse. Plaatst daar alle bestanden waar je de Email adressen wilt uithalen. (Volgens uw test voorbeelden email in cel A1) Open het bestandje Analyse en druk op de knop in het blauwe veld. Er wordt een nieuw bestand aangemaakt met de email adressen. Wil je een bestaande map gebruiken moet je in de VBA een lijntje code Aanpassen. ik heb in de code aangeduid welke lijn (groen) Verander MyPath = "C:\Analyse\" Stel die map staat in je documenten en de naam van de map is Klanten, dan wordt het zoiets. "C:\Users\Userl\Documents\Klanten\" (User vervangen door de echte naam) De rest van de werkwijze is hetzelfde.. In bijlage het bestandje. (Analyse) Als er vragen zijn dan hoor ik wel. Prettige feesten. analyse.xlsm
  11. dotchiejack

    Niets laten zien bij leeg veld

    Hoi Snowy, Met een voorbeeld bestand bedoeld Emiel een excel bestandje, geen plaatje. Het is moeilijk om een formulevraag op te lossen zonder de formule te kennen.
  12. dotchiejack

    excel vba macro sneller laten werken of verbeteren?

    Garantie tot aan de deur wegens het ontbreken van een voorbeeld,en een glazen bol.😎 Het heeft weinig zin om je variabelen te declareren als je option explicit niet gebruikt. Volgens je code staat de knop 35 op de Verkoopfactuur , dan is al de WS1code overbodig. probeer het eens zo of post een voorbeeld bestandje met wat Jan en Katrien gegevens als je problemen ondervindt. Sub Knop35_Klikken() Datum = Range("O19").Value factnr = Range("O20").Value Relatie = Range("O21").Value If Relatie = "" Then MsgBox "Er is geen relatie geselecteerd." Exit Sub End If If Datum = "" Then MsgBox "Er is geen datum ingevuld." Exit Sub End If If factnr = "" Then MsgBox "Er is geen factuurnumer ingevuld." Exit Sub End If With Sheets("Verkoop") Set factnr = .Find([O20].Value, LookIn:=xlValues, LookAt:=xlWhole, MatchCase:=False) If Not factnr Is Nothing Then MsgBox "Er is al een factuur met dit nummer aanwezig!" Exit Sub End If If IsEmpty(.Range("O20")) Then MsgBox "factuurnummer niet ingevuld", vbCritical, "Factuurnummer" Exit Sub End If iRow = .Cells.Find(What:="*", SearchOrder:=xlRows, SearchDirection:=xlPrevious, LookIn:=xlValues).Row + 1 .Cells(iRow, 1).Resize(, 14).Value = Array([O34].Value, [P34].Value, [Q34].Value, [034].Value, [T34].Value, , _ [V34].Value, , [X34].Value, , , [AA34].Value, [AA35].Value, [AC35].Value) End With End Sub
  13. Hoi Jenifer, Misschien kan je hiermee verder? Zo installeer je Linux op je (oude) Mac Hier nog een link waar je Linux mint kan downloaden. Ikzelf gebruik de Cinnamon 64 bit versie en ben er heel tevreden over. (de 32 bit versie is ook beschikbaar) Linux mint
  14. dotchiejack

    Windows7 en Edge?

    Geen idee wat IE nog kan of niet, ik werk al jaren met firefox. IE en Edge zijn voor mij gewoon microsoft spionnen die ik direct buiten kieper.. Als ik moest kiezen tussen Edge in een virtuele W 10 en een Firefox in W7 zou ik wel weten wat te kiezen.
  15. dotchiejack

    Windows7 en Edge?

    Euh? Je kan toch IE11 op windows 7 installeren.
Logo

OVER ONS

PC Helpforum helpt GRATIS computergebruikers sinds juli 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!

×

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.