Search:

Type: Posts; User: Worf; Keyword(s):

Page 1 of 6 1 2 3 4

Search: Search took 0.18 seconds.

  1. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    Questions:

    Do you want the code to insert the blank rows?
    I understand that after the dates are separated, all the range has to be transferred to a single email, is this correct?
  2. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    ​The second link is not working for me. I am giving you my email on a PM so you can send it to me.
  3. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    At the Excel VBE, add a reference to the Microsoft Outlook xx Object Library.
    My code removes blank rows in the middle of the data; if your range is a single block, finding the last used row is...
  4. Replies
    1
    Views
    107

    Re: Border around cell that hover over

    Welcome to the Board

    This code highlights the active cell differently:


    Dim old As Range, st As Boolean


    ' this code goes at ThisWorkbook module <--------
    Private Sub...
  5. Replies
    6
    Views
    1,140

    Re: Excel workbook to powerpoint with animation

    You can insert this line in the existing code:


    Sub mscale()
    Dim ws As Worksheet, i%, cht As ChartObject
    For Each ws In ActiveWorkbook.Worksheets
    For i = 1 To 2
    Set cht =...
  6. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    This example does it without writing to the worksheet:


    ' Excel module
    Sub mail()
    Dim myitem As MailItem, olapp, xdoc As Word.Document, stext$, _
    odata As New DataObject, col%, i%, r As Range,...
  7. Replies
    76
    Views
    3,408

    Re: Code To List Numbers Missing From Sequence

    As before, I need the input data that generates the error, either here or via email.
  8. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    I see two ways of doing this:



    Extracting rows with data to another worksheet or another position on the same sheet, and then pasting this data into Outlook. This writes to the worksheet.
    ...
  9. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    I got that, but I need to know if I can write to the worksheet or not.
    If writing is allowed, it is ready.
  10. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    That code writes the desired data to a new worksheet location, from where it can be copied to the email.
    Would you prefer to copy it to memory, and then to Outlook?
  11. Replies
    2
    Views
    121

    Re: vba change gradient color in graph

    My Excel version does not recognize the constants in your code. What version are you using? Windows or Mac?
    Can you describe the steps you are taking to apply the gradient manually?
  12. Replies
    16
    Views
    450

    Re: Help Modifying Code to Send E-mail

    Here is one way to get the desired rows:


    Sub Macro14()
    MsgBox "Rows with data were moved to " & foo([b2:f15]) ' your range here
    End Sub


    Function foo$(r As Range) ' receives the...
  13. Replies
    6
    Views
    1,140

    Re: Excel workbook to powerpoint with animation

    New version:


    Dim objppt As PowerPoint.Application, pres As Presentation, s$


    Sub OpenFiles() ' run me
    Dim wb As Workbook, MyFile$, Directory$
    Set objppt = New PowerPoint.Application...
  14. Re: SendKeys to unlock a VBA Project placing password inside an already unlocked project module

    This may help:

    http://www.siddharthrout.com/index.php/2019/01/20/unprotect-vbproject-from-vb-code/
  15. Replies
    76
    Views
    3,408

    Re: Code To List Numbers Missing From Sequence

    This is the version I have on my personal macro workbook. I brought up the macro dialog box with Alt+F8 and executed it from the test workbook, which was the only file open. It worked correctly.

    ...
  16. Replies
    3
    Views
    674

    Re: pivot table - more tables option

    Sorry, I do not know a thing about Macs.
  17. Replies
    76
    Views
    3,408

    Re: Code To List Numbers Missing From Sequence

    I tested the code from post 62 with the two data sets you provided and it completed without errors.
    I am sending my test workbook back to you; try it on two different machines if possible.
  18. Replies
    76
    Views
    3,408

    Re: Code To List Numbers Missing From Sequence

    If you show me the input data that produces the error, I can investigate the issue. No results are necessary since it errors out.
  19. Replies
    76
    Views
    3,408

    Re: Code To List Numbers Missing From Sequence

    Note that the code from post 62 worked for me with ten numeric characters.
  20. Re: VBA Pivot Table filters based on two ranges of cells

    What kind of pivot field is it? Column, row, value?
  21. Re: VBA Pivot Table filters based on two ranges of cells

    Welcome to the Board

    Here is an example:



    ' this is the module for a worksheet named "software"
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim rng1 As Range, pt As...
  22. Thread: Outlook VBA

    by Worf
    Replies
    1
    Views
    349

    Re: Outlook VBA

    Hi


    ' Outlook module
    Sub GetAttachments()
    Dim ns As NameSpace, Inbox As MAPIFolder, Item As Object, _
    Atmt As Attachment, FileName$, i%, mi As MailItem
    Const thold = 100 ' days...
  23. Replies
    6
    Views
    1,140

    Re: Excel workbook to powerpoint with animation

    The code creates this animation:

    https://i.imgur.com/oYcAyM9.png



    ' Excel module
    Sub exportCharts2Ppt()
    Dim objPPT As powerpoint.Application, sld As Slide, n%, i%, sh As powerpoint.Shape...
  24. Replies
    76
    Views
    3,408

    Re: Code To List Numbers Missing From Sequence

    Give me the input data, either here or by email, so I can try to reproduce the error and fix it.
  25. Replies
    1
    Views
    102

    Re: Apply Value Filter to Pivot table using VBA

    What kind of field is "sold price"?


    Sub Macro2()
    ' uses cells K15 and K16
    Dim pt As PivotTable
    Set pt = ActiveSheet.PivotTables("PivotTable2")
    pt.PivotFields("category").PivotFilters.Add2...
Results 1 to 25 of 150
Page 1 of 6 1 2 3 4