Search:

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

Page 1 of 6 1 2 3 4

Search: Search took 0.10 seconds.

  1. Replies
    7
    Views
    105

    Re: BuiltIn Dialog Boxes

    https://docs.microsoft.com/en-us/openspecs/office_standards/ms-customui/bb5bb594-ec8c-45f6-8424-f98e8308b25a

    Also they both work...
  2. Re: IF any of 10 columns equals any of 4 other columns

    If by "step by step" you mean a macro, then what about this...


    Sub TEST()
    Dim i As Long, x As Long
    For i = 43 To 62 Step 2
    For x = 30 To 33
    If Not Cells(3,...
  3. Replies
    7
    Views
    105

    Re: BuiltIn Dialog Boxes

    Also, if you look closely this command did not use your variable "strDialogBox" but rather "FormatCellsFontDialog"
  4. Replies
    7
    Views
    105

    Re: BuiltIn Dialog Boxes

    Perhaps I am not understanding, but is this what you are looking for. It seems like you have it already...

    Both of these will open the Format Cells Font Dialog box.


    Dim strDialogBox...
  5. Replies
    7
    Views
    105

    Re: BuiltIn Dialog Boxes

    Errant post
  6. Replies
    3
    Views
    138

    Re: desesconder fila por fila

    Yo no hablo español. Estoy usando el traductor de Google. ¿Está esto más cerca de lo que quieres?


    Sub unhide()
    Dim i As Long
    For i = 6 To 43
    Rows(i).Hidden = False
    Next
    ...
  7. Replies
    3
    Views
    70

    Re: Add commandbutton on any excel sheets

    Whatever works for you is the right thing. I was happy to help. Thanks for the feedback.
  8. Replies
    3
    Views
    138

    Re: desesconder fila por fila

    te ayuda esto


    'des-esconder
    ActiveSheet.Range("A5:A43").EntireRow.Hidden = False

    'escondiendo
    ActiveSheet.Range("A5:A43").EntireRow.Hidden = True
  9. Replies
    3
    Views
    70

    Re: Add commandbutton on any excel sheets

    This would add a button that will run your code "auto_open" to the activesheet. You can change the name, size, placement, text, color, etc, as you see fit...


    Sub AddButton()


    ...
  10. Re: How to find maximum quantity sold with item description in the given data

    Hi tawakal,

    Welcome to the MrExcel Forum.

    You may have to be a little more precise in your requirement. I have looked at your data and there are no duplicate (similar but not duplicate) Product...
  11. Replies
    4
    Views
    133

    Re: Adding Values Based On Matching Cells

    You are welcome. I was happy to help. There is not much to the code. I put some comments in to give you an idea of what is happening...


    Sub test()
    'Declare the variables
    Dim c As...
  12. Replies
    4
    Views
    133

    Re: Adding Values Based On Matching Cells

    Does this do what you want...


    Sub test()
    Dim c As Range, j As Range, rngC As Range, rngJ As Range
    Set rngC = Range("C1:C" & Cells(Rows.Count, "C").End(xlUp).Row)
    Set rngJ =...
  13. Replies
    1
    Views
    96

    Re: Move table from one sheet to another?

    Is this what you are looking for...


    Sub ToggleTableHiddenSheet()


    Const sHomeSheet = "Sheet1"
    Dim sMoveToSheet As String

    With Range("Table1[#All]")
  14. Replies
    6
    Views
    212

    Re: MatchEntry Property

    This video may be what you are looking for...

    https://www.youtube.com/watch?time_continue=167&v=vOOuSe_s6pQ
  15. Replies
    12
    Views
    251

    Re: VBA if cell contain text

    Rick Rothstein

    My pleasure. I have "stolen" so many of your routines, it's the least I could do.

    igold
  16. Replies
    12
    Views
    251

    Re: VBA if cell contain text

    Hi Rick,

    Ran it twice, ~49 seconds both times.

    As a check, ran the other code right after to make sure that the machine was not busy somewhere else and got the same results...
  17. Replies
    12
    Views
    251

    Re: VBA if cell contain text

    @ My Aswer,

    Just for shiggles, I ran my test data out to 250k rows of data (I meant to go 100k, but was talking to someone and forgot to let go of the mouse button). On my machine our first two...
  18. Replies
    12
    Views
    251

    Re: VBA if cell contain text

    Other than perhaps that as per your graphic the range should have correctly started at "A1" and not "A2", as My Aswer asked, what happened...
  19. Replies
    12
    Views
    251

    Re: VBA if cell contain text

    Does this do what you want...


    Sub test()
    Dim rng As Range, i As Long
    Set rng = Range("A2:B" & Cells(Rows.Count, 1).End(xlUp).Row)
    For i = 1 To rng.Cells.Count Step 2
    With...
  20. Replies
    1
    Views
    122

    Re: Loop not Looping!

    You have a lot of stuff going on here and we have no idea what your data looks like; including a couple of "IF/THEN" statements which can evaluate to an "Exit Sub". Have you stepped through the code...
  21. Replies
    8
    Views
    288

    Re: Dynamic array in autofilter

    Is this what you are looking for...


    Sub Filter_array()


    Dim myArray() As Variant, TempArray As Variant
    Dim myTable As ListObject
    Dim i As Long
    Dim rng As Range
  22. Replies
    8
    Views
    288

    Re: Dynamic array in autofilter

    How about this..


    Sub Filter_array()


    Dim myArray() As Variant, TempArray As Variant
    Dim myTable As ListObject
    Dim i As Long
  23. Replies
    8
    Views
    277

    Re: I hope this can be done?

    Errant post
  24. Replies
    2
    Views
    149

    Re: Help Needed for unique task

    How about something like this...


    Sub RenameSaveWorkbooks()


    Dim wb As Workbook
    Dim myPath As String, myFile As String, myExtension As String
    Dim FldrPicker As FileDialog
    ...
  25. Replies
    3
    Views
    113

    Re: Delete and highlight

    Did you try the code, I thought I did that...
Results 1 to 25 of 150
Page 1 of 6 1 2 3 4