Search:

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

Page 1 of 6 1 2 3 4

Search: Search took 0.27 seconds.

  1. Re: Count number of months per year between two dates

    https://www.techonthenet.com/excel/formulas/datedif.php
  2. Re: Copy certain columns from one spreadsheet to another, based on criteria in one column

    Option Explicit


    Sub testX()
    Dim s1 As Worksheet, s2 As Worksheet
    Set s1 = Sheets("A")
    Set s2 = Sheets("B")
    Dim i As Long, lr As Long, lrB As Long
    ...
  3. Re: VBA Code to Multiple Specific Cells by Cell Value

    Option Explicit


    Sub test1()
    Dim m As Variant
    Dim c As Range
    Dim rng As Range
    m = Range("A1")
    Set rng = Range("B14:D14", "B15:D15")
    For Each c In rng
  4. Replies
    5
    Views
    174

    Re: VBA to create list based on input

    Can you provide some sample data and show a before and after scenario of what you are looking for. Your explanation is difficult to follow and we need more specific information regarding products...
  5. Replies
    25
    Views
    1,877

    Re: Find next whole number in list

    Here is a vba solution to find all the whole numbers and list them in column C if your data is currently in column A


    Option Explicit


    Sub FindInteger()
    Dim i As Long, lr As Long, lr2 As...
  6. Replies
    6
    Views
    173

    Re: How to auto delete cells every day

    Private Sub Workbook_Open()
    If Sheets("Aux").Range("A1").Value < Date Then
    Sheets("LEAVE TRACKER").Range("D3").EntireColumn.Delete
    End If
    Sheets("Aux").Range("A1").Value =...
  7. Replies
    6
    Views
    173

    Re: How to auto delete cells every day

    You have provided code that we don't know if it works or not. You have not indicated what you actually want to happen. We can guess, but it would be better, if you just told us specifically what...
  8. Replies
    10
    Views
    308

    Re: Text to Date Conversion

    Option Explicit


    Sub foo()
    Dim lr As Long, i As Long
    lr = Range("A" & Rows.Count).End(xlUp).Row
    For i = 1 To lr
    Range("A" & i) = Right(Range("A" & i), 6)
    ...
  9. Re: copy a column - paste as a row with comma separated

    An alternative solution is to use Power Query. Here is the Mcode for such an action


    let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Changed Type" =...
  10. Replies
    6
    Views
    130

    Re: Transpose one row in two columns.

    Look at the last link in my signature in post #5
  11. Replies
    6
    Views
    130

    Re: Transpose one row in two columns.

    Power Query is an alternate means to achieve this:


    let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Unpivoted Columns" = Table.UnpivotOtherColumns(Source, {},...
  12. Replies
    7
    Views
    179

    Re: Tranpose with Editing

    An alternative method is to use Power Query. Bring your data into PQ. Split the column employing "/" as your delimiter. Then unpivot your columns. Delete the unnecessary column. Here is the...
  13. Re: File dialog prompt for power query source file

    https://www.youtube.com/watch?v=0NX-GctfZuU
  14. Re: PowerPivot - Consolidating identical data sets from two companies

    If I am understanding correctly, I would load each table into power query and then append one to the other. You now have a single table that you can either bring back to Excel and create a pivot...
  15. Replies
    3
    Views
    88

    Re: Counting data in multiple columns

    You have failed to answer my questions. Please try again and look at each question and respond accordingly. It may be clear to you but I cannot read your mind or see your workbook.
  16. Replies
    3
    Views
    88

    Re: Counting data in multiple columns

    A couple of questions. Where should the result be published? Is it column I and column J both have a value greater than .5 or is it an either/or situation. Is the count cumulative for the...
  17. Re: VBA: loop in cells and delete bracket content

    For the cells in question, are the only values the city and the bracketed information? Or, is there other information in the cells also. Can you provide a sample of 5-10 cell values showing all...
  18. Replies
    3
    Views
    170

    Re: Returning a Share Price from Google

    Look at this link. This is what I use.
    ...
  19. Replies
    12
    Views
    648

    Re: Delete entire row

    You have not responded to my questions about error messages. No answer means no help. Help us to help you by responding directly to our questions surrounding your problems. BTW, no where in post 1...
  20. Replies
    12
    Views
    648

    Re: Delete entire row

    Where is the error and what is the error message. We are not mindreaders here. When you get the error, click on debug and tell us the pertinent information. Your code does not show sanju as a...
  21. Replies
    12
    Views
    648

    Re: Delete entire row

    Option Explicit


    Sub Andy()
    Dim s1 As Worksheet, s2 As Worksheet
    Set s1 = Sheets("Sheet1")
    Set s2 = Sheets("Sheet2")
    Dim i As Long, j As Long, lr As Long, lr2 As Long
    lr...
  22. Replies
    18
    Views
    492

    Re: Returning Home

    Option Explicit


    Dim CloseTime As Date
    Sub TimeSetting()
    CloseTime = Now + TimeValue("00:00:15")
    On Error Resume Next
    Application.OnTime EarliestTime:=CloseTime, _
    ...
  23. Replies
    7
    Views
    262

    Re: Merging specific worksheets

    You should consider Power Query / Get and Transform. Any changes to the original data is automatically updated into the output.
  24. Re: VBA: Fastest way to determine last non blank row in column

    ....and Joe types faster than me. :)
  25. Re: VBA: Fastest way to determine last non blank row in column

    LR=Range("L" & rows.count).end(xlup).row
Results 1 to 25 of 150
Page 1 of 6 1 2 3 4