Search:

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

Page 1 of 6 1 2 3 4

Search: Search took 0.39 seconds.

  1. Replies
    1
    Views
    102

    Re: copy entire row based on cell vale

    Sheet names in both workbooks? Column letter of the "Remarks" column? is the space at the start of " send mal" supposed to be there? is " send mal" the only text in the cell?
  2. Replies
    17
    Views
    270

    Re: Fullfill blank cells

    Assuming that your cells are truly blank and column B are constants then maybe...


    Sub Panoos64()
    On Error Resume Next
    With Range("B5:B" & Range("A" &...
  3. Thread: vba print area

    by MARK858
    Replies
    10
    Views
    321

    Re: vba print area

    Try...


    Sub macro1B()
    ActiveSheet.PageSetup.PrintArea = Range("A9:I" & Columns(2).Find("*", , xlValues, , xlByRows, xlPrevious).Row).Address
    End Sub

    Untested and expect typos as I am on...
  4. Thread: vba print area

    by MARK858
    Replies
    10
    Views
    321

    Re: vba print area

    No you don't need to change anything at this stage, just answer the question as to what is in B250? is it a formula returning "" once you have answered that then we can (depending on your answer)...
  5. Thread: vba print area

    by MARK858
    Replies
    10
    Views
    321

    Re: vba print area

    Then what have you got in row 250, in particular column B? Do you have formulas returning ""?
  6. Replies
    12
    Views
    232

    Re: If Cell is 5 or more less than a cell

    Board software messed up Fluff's posting it was...
  7. Replies
    4
    Views
    111

    Re: Spaces causing error

    Have you tried
  8. Thread: vba print area

    by MARK858
    Replies
    10
    Views
    321

    Re: vba print area

    Maybe...


    Sub macro1B()
    ActiveSheet.PageSetup.PrintArea = Range("A9:I" & Range("B" & Rows.Count).End(xlUp).Row).Address
    End Sub
  9. Replies
    3
    Views
    79

    Re: Paste Only Values

    Maybe you mean something like....



    For Each c In CopyRng
    Dim LstRw As Long
    LstRw = DestSht.Cells(Rows.Count, "A").End(xlUp).Row
    c.Copy
    With...
  10. Replies
    3
    Views
    79

    Re: Paste Only Values

    In what way does the below not work (I am assuming that your layout looks incorrect in the first post because of not using code tags and it isn't how it appears in your actual code).


    ...
  11. Replies
    8
    Views
    157

    Re: "Blank" cells that are not really blank

    If you do away with the Select/Selection it will run smoother/quicker ;)


    Range("K43:K20000").TextToColumns Destination:=Range("K43"), DataType:=xlFixedWidth, _
    FieldInfo:=Array(0, 1),...
  12. Replies
    8
    Views
    157

    Re: "Blank" cells that are not really blank

    Just to point out that you can use the delimited option in text to columns so you don't need to remove any lines as below...

    Select Column K, click "Data" tab - click "Text To Columns" - select...
  13. Replies
    8
    Views
    157

    Re: "Blank" cells that are not really blank

    If all the cells in the range are constants not formulas then try....


    Sub mod1b()
    With Range("K43:K20000")
    .Value = .Value
    End With
    End Sub
  14. Replies
    13
    Views
    5,091

    Re: Excel VBA Barcode Generator

    What are you expecting the results to be? What are the barcode form that you are using?
  15. Replies
    6
    Views
    337

    Re: is this left() VBA or Worksheet function

    It is VBA else it would be WorksheetFunction.Left although I can't think of any difference between the 2 bar a miniscule speed difference.
  16. Replies
    1
    Views
    54

    Re: How can I add a progress bar to a loop?

    Have a look at the link below

    https://wellsr.com/vba/2017/excel/beautiful-vba-progress-bar-with-step-by-step-instructions/

    And a few examples in the spreadsheet download in the link below
    ...
  17. Re: Highlight cell if date is greater than SPECIFIC date

    You need to use put the formula in conditional formatting... see the link below

    https://exceljet.net/conditional-formatting-with-formulas

    and attached is a file with it working (please note...
  18. Re: Highlight cell if date is greater than SPECIFIC date

    Works fine for me. Explain the steps you took.
  19. Re: Highlight cell if date is greater than SPECIFIC date

    If it is just the 2 cells then the conditional formatting formula is just....


    if you need it for the other cells in the columns then
  20. Re: For Every 1500 Rows Copy To New Sheet & Save

    You'll probably find that it is the use of copy in DanteAmor's code which is using the clipboard that is making the big difference in this case, if it was a .Value = .Value then I would suspect the...
  21. Re: For Every 1500 Rows Copy To New Sheet & Save

    Why? you are writing a continuous range to the sheets the same number of times.
  22. Re: How do I copy and paste avoiding top line

    If you have no blank rows select the cells in row 2 and then Shift + Ctrl + ↓
  23. Re: CountIF Formula if cell is yellow and has Satisfactory

    Try putting the code below in a regular module, then use the formula below.
    Please note that it will only pick up the standard yellow, if they don't use it then we can change the code so that it is...
  24. Replies
    5
    Views
    112

    Re: VBA PasteAll Question

    What happens if you paste the values and formats separately? i.e.



    Workbooks("CB2.xlsx").Worksheets("Sheet1").Range("A3:E500").Copy
    With...
  25. Replies
    7
    Views
    191

    Re: VLOOKUP help (not SUMIF)

    Why is it a long work around? you have a list of your unique names and just drag (or if the names are in the next column autofill) the formula down. There are only 3 formula there 1 for the people, 1...
Results 1 to 25 of 150
Page 1 of 6 1 2 3 4