• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Recent content by ysherriff

  1. Y

    Sort by multiple columns

    Hi i have the below code to sort by multiple columns but for some reason it is not working. I do not get an error message but the code doesn't work. What am i missing? Thanks for your help With ActiveSheet.Sort .SortFields.Clear .SortFields.Add Key:=Range("D9:D700" _...
  2. Y

    Extract text

    Hi, i have the following fixed path and would like to extract the numbers from the text string. For instance, for below, i would like to extract: 97357 and 2203 without using Text to Columns but formula. Totals for 97357 Westhills Village Health Care Totals for 2203 GL - Prairie Hills Thank...
  3. Y

    Date Filter

    I agree there is a shorter way to write the code but i will have to play with it next time. your code is okay but it will not filter correctly. i just don't have time to mess with it to understand the syntax becuase the project is due on monday. i will play with it when i have more time even...
  4. Y

    Date Filter

    Everything works but the field will not filter. The filter doesn't recognize the date parameter and skips it. For example i have 10-2016 filtered but it will not filter. I think it is best to do multiple if statements. If Range("b7") = vbNullString Then 'it is blank dataWB.Close...
  5. Y

    Date Filter

    The filter field is field 15 not 11. it was wrong in the code.
  6. Y

    Date Filter

    I think i found the issue. I replaced .columns(B:AC) with .ListObjects("CJR_TBL").Range.AutoFilter Field:=15
  7. Y

    Date Filter

    Thank you but i am getting this error message: If Range("b7") = vbNullString Then 'it is blank dataWB.Close SaveChanges:=False Else With ActiveSheet .Unprotect "ops" .AutoFilterMode = False...
  8. Y

    Date Filter

    Hi vlatem. could you explain why the cv string? Thanks
  9. Y

    Date Filter

    Thank you for the syntax. i believe this will work. It is much apprecaiated
  10. Y

    Date Filter

    Thanks vletm but i don't think that addresses my issue. I appreciate your help. i will see about another alternative.
  11. Y

    Date Filter

    Thanks for the response vletm but that is not the issue. There are two issues, if you look at the table, i have a column for month and year that is formatted based on column O. So if a the timeframe is Year, then column 2 is filtered. I want to know if there is a way to filter the timeframe only...
  12. Y

    Date Filter

    Hi, From a dropdown user selects the following date format for months (09-2016, 10-2016, 11-2016, etc.) and for years they select (2016, 2017, etc.) I have a macro that filters for the specified date but I believe there is a more efficient way of doing this. The way i am doing this now is...
  13. Y

    User input populate field

    Hello, I have a macro that a message box opens and the user selects "yes", or "no". If the entry is "no", i want it to populate the next empty cell in a column. How do i accomplish that? For example in the image below, if a user selects "no", then i would like the macro check the adjacent...
  14. Y

    Nested if statements

    Thank you guys. i fixed the syntax. i had the below code before the End If statement and therefore with the multiple nest statements, it did not compute. I replaced the code after the END If loop and it worked. 'copy filtered data Set tbl = ActiveSheet.AutoFilter.Range...
  15. Y

    Nested if statements

    below is the full vba code Sub Consolidate_DOR() Dim strListSheet As String, sh As Worksheet, TargetSh As Worksheet Dim DestCell As Range, LastRow As Long, i As Integer, strFileNamePath As String Dim strFileName As String, currentWB As Workbook, dataWB As Workbook, filecount As...
See more
Back
Top