lookin=xlvalues

Hi. I was hoping someone could point out where I have gone wrongwith this one. I have a value of “0” in cell A5 and a value of “2500” incell A55. I’m using VBA to draw a vertical line from A5 to A55. I then want to draw a line to intersect the vertical line bymatching a value in Cell M4...

What could be causing an "Unable to get the Sum property of the WorksheetFunction class" error with this line in red? eqt_stcol = .Rows(2).Find(What:=UserForm1.uf1cbx2_eqt.Value, LookIn:=xlValues, LookAt:=xlWhole, MatchCase:=False).Column etotal_col =...

I’m trying to search for a specific value in a list.This code looks for zeroes and it works Selection.Find(What:="0.00 ", After:=ActiveCell, LookIn:=xlValues, _ LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _ MatchCase:=False, SearchFormat:=False).Activate...

Hi All Good day for you........ I Run below code i get run-time error. Please need you help Sub GetFileCopyData() Dim Fname As String Dim SrcWbk As Workbook Dim DestWbk As Workbook Set DestWbk = ThisWorkbook Fname = Application.GetOpenFilename(FileFilter:="Excel Files...

I'm trying to delete a range of columns that have dates (starting at 9/1/2017) as headers. I need it to delete from 9-2017 -> 8-2018, but when I run the code it keeps: Sep-17, Oct-17, and deletes Sep-18 and Oct-18. I'm not quite sure what is happening. Here is the code: Dim dateStart, dateEnd...

Hello, The code below used to work, but it was pulling from data that was set up as such: Operator Name = "J Doe" The quotes were since removed and the raw data now looks like this: Operator Name = J Doe How do I adjust this code below to pull correctly again? Thank you! blnSkip = False...

<colgroup><col width="64" span="2" style="width:48pt"> </colgroup><tbody> A 14 B 16 C 68 D 0 E 32 F 25 G 25 H 55 </tbody> Sub using_the_resize_property_to_change_thesizeofRangeMethod1() Set Rng = Range("B1:B15").Find(what:="0"...

I am sure this is just the dumbest thing I am overlooking, but does anyone have any insight as to why this first one works and the second brings back a error 91 Object variable or with block variable not set. Both my variables or 'Set' are declared as Ranges - hence having a .Row and a .Column...

Test code: Option Explicit Sub SearchTest() Dim Search As Range Dim MyRange As Range Set MyRange = Worksheets(1).Range("A1:A8") Set Search = MyRange.Find(What:="0", LookIn:=xlValues) Debug.Print Search.Row Set Search = MyRange.Find(What:="00", LookIn:=xlValues)...

Hi, appreciate any help with this frustrating problem. I am trying to retrieve statistical data from various monthly sheets ( Jan, Feb, March etc.,) to a single master sheet. I have set the code up to retrieve the data and all goes well until we get to August. As the data is not yet available...

Hi can someone help to turn it into to an array, I have tried to do an array but got nowhere, if not maybe help with tidying it up. Thanks With ActiveSheet.UsedRange Set c = .Find("Ref-Designator", LookIn:=xlValues) ActiveSheet.Range(c.Address).EntireColumn.Cut...