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!


    Aanbevolen berichten

    Goedemiddag,

    Ik heb een macro draaien in excel om door een druk op een knop een bestand naar een aantal mensen te versturen door middel van e-mail.

    In de macro heb ik een onderwerp kunnen plaatsen, die dan wordt weergegeven in de mail.

    Graag wil ik in de macro ook een tekst kunnen plaatsen, die dan wordt weergegeven in de normale weergave bij de geadresseerde.

    Ben hier al een tijd mee bezig, maar wil nog steeds niet lukken.

    Weet iemand misschien een oplossing hiervoor?

    Deel dit bericht


    Link naar bericht
    Delen op andere sites

    Log in om dit te volgen  

    • Welkom op PC Helpforum

    • Leden statistieken

      • Aantal leden
        39.354
      • Meeste online
        1.765

      Nieuwste lid
      Liha
      Registratiedatum
    • Gerelateerde inhoud

      • 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 Benjaplus
        Hoi hoi,
         
        Ik ben bezig met het opstellen van een factuur in Excel alleen heb ik nog niet al te veel ervaring met Excel en ik kan niks vinden over mijn probleem op internet.
         
        Mijn probleem:
        Ik wil deze zin onderaan mijn factuur: U wordt vriendelijk verzocht het bedrag van (Bedrag uit H36(volledig uitgeschreven in euros)) voor (VANDAAG+14) over te maken op NL00 RABO 0123 4567 89 t.n.v. Naam onder melding van factuurnummer: (nummer uit A14)
         
        Alle ( ) moeten formules worden
         
        Dingen die vet gedrukt zijn moet dat ook zijn in excel
         
        Ik kom zelf tot: ="U wordt vriendelijk verzocht het bedrag van €"&H36&" voor "&VANDAAG()+14&" over te maken naar NL00 RABO 0123 4567 89 t.n.v. Naam onder melding van factuurnummer: "&A14&""
         
        Dan krijg ik: U wordt vriendelijk verzocht het bedrag van €254.1 voor 43775 over te maken naar NL00 RABO 0123 4567 89 t.n.v. Naam onder melding van factuurnummer: 2001
         
        €254.1 moet €254.10 worden (komt door getalnotaties)
        43775 moet 06-11-19 worden (komt door getalnotaties)
        en de andere moet vet gedrukt worden
         
        Het is veel gevraagd, ik weet het, maar ik kom er niet uit. Misschien is het gewoon niet mogelijk, laat het maar weten.
         
        Alvast enorm bedankt!
      • Door Emma Boschmans
        Wanneer ik in onderstaand document in een invulvak tekst wil typen lukt dit.
        Wil ik echter een titel wijzigen of de layout aanpassen krijg ik steeds de melding: 'u kunt deze wijziging niet aanbrengen omdat de selectie is vergrendeld'.
        Ik had het document echter graag aangepast aan mijn persoonlijke voorkeuren. Is er een manier om deze vergrendeling uit te schakelen? 
         
         

      • Door Kadoim
        Is er een manier in Excel om automatisch te laten berekenen welke kolommen de minste overlap hebben?
        Ik heb een draaitabel (mijn eerste...) gemaakt van de inschrijvingen in bepaalde opleidingen. De opleidingen gaan altijd door op maandagnamiddag.
        Door het toevoegen van slicers kan ik één voor één bekijken welke opleidingen géén overlappende inschrijvers hebben, maar voor het opmaken van de opleidingskalender, zou ik ook graag automatisch te zien krijgen welke opleidingen de minste overlappers hebben - aangezien het niet altijd haalbaar is om de opleidingen te plannen zonder enige overlap.
         
        Ik heb een bestandje toegevoegd als voorbeeld.
        Vertaald naar dat voorbeeld zou ik dus graag weten of het mogelijk is om op een snelle, geautomatiseerde manier te weten te komen welke twee kolommen de minste overlappende 1'tjes hebben, zodat ik weet dat ik die opleidingen eventueel op eenzelfde dag kan laten doorgaan.
         
        Alvast bedankt voor de hulp!
        Voorbeeld voor pc helpforum draaitabel.xlsx
    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!

    ×
    ×
    • Nieuwe aanmaken...

    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.