sh5

  1. M

    Unable to run program for Serpentine

    Can any help me correct the below program Sub Serpentine() Dim N As Long, i As Long, j As Long Dim sh5 As Worksheet K = 1 Set sh5 = Sheets("Common") N = sh5.Cells(Rows.Count, "A").End(xlUp).Row For i = 1 To N For j = 1 To Columns.Count If...
  2. J

    vba copy paste values and formats

    Hi I have this code Sub cpynpst() Dim sh4 As Worksheet, sh5 As Worksheet, lr As Long, rng As Range Set sh4 = Sheets("A Days") Set sh5 = Sheets("WeeklyDetail") lr = sh4.Cells(Rows.Count, 1).End(xlUp).Row Set rng = sh4.Range("A2:A" & lr) rng.EntireRow.Copy sh5.Cells(Rows.Count, 1).End(xlUp)(2)...

Some videos you may like

This Week's Hot Topics

  • Sort code advice please
    Hi, I have the code below which im trying to edit but getting a little stuck. This was the original code which worked fine,columns A-F would sort...
  • SUMPRODUCT with nested If statement
    Hi everyone, Hope you're all well. I'm hoping someone will be able to point me in the right direction with a problem I'm having with a SUMPRODUCT...
  • VBA - simple sort is killing me!
    Hello all! This should be so easy, but not for me, apparently! I have a table of data that can be of varying lengths and widths. My current macro...
  • Compare Two Lists
    I have two Lists and I need to be able to Identify differences between them. List 100 comes from a workbook - the other is downloaded form the...
  • Formula that deducts points for each code I input.
    I am trying to create a formula that will have each student in my class start at 100 points and then for each code that I enter (PP for Poor...
  • Conditional formatting formula required for day of week and a value
    Hi, I have a really simple spreadsheet where column A is the date, column B is the activity total shown as a number and column C states the day of...
Top