1. B

    delete old files from, folder and list, shift cells up under conditions.

    the issue is that the code is is deleting more than i ask for. it also deletes a cell that is not colored. Sub delete_test_2() Dim MyFolder As String Dim cell As Range Application.ScreenUpdating = False With Sheets("Delete Revs") MyFolder = .Range("K1").Value & "\" For Each cell...
  2. O

    VBA to shift task when done

    Hey Guys So am new to VBA and am having a problem with the below: Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next Application.EnableEvents = False If Target.Column = 2 And Target.Value = "Done" Then LRowCompleted = Sheets("Jobs").Cells(Rows.Count...

Some videos you may like

This Week's Hot Topics