Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Sub PrepCNLT_ForVLOOKUP() ' ' PrepCNLT_ForVLOOKUP Macro Sheets("FormatCNLT").Select Columns("C:C").Select Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove Application.Run "'Daily Metrics.xlsm'!ConcateniateColAandColB" Columns("C:C").EntireColumn.AutoFit Range("G2").Select ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-4],Yesterday,1,FALSE)" Range("G2").Select ' Need to add something here to autofill formula down no matter how many rows ' are in that column Selection.AutoFill Destination:=Range("G2:G418") Range("G2:G418").Select ' Without using absolute cell references. Columns("G:G").Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False Range("A2").Select End Sub Sub NameTheNewlyConcatinatedRangeToYesterday() ' Range("C2").Select 'Same thing here, I need to select however many rows in the column, and name the 'range yesterday. It would be nice if this could get included into the above Sub Range(Selection, Selection.End(xlDown)).Select ActiveWorkbook.Names.Add Name:="Yesterday", RefersToR1C1:= _ "=FormatCNLY!R2C3:R412C3" End Sub
Join the community of 500,000 technology professionals and ask your questions.