myrange

I need to format ALL the cells in a filtered table (even the hidden ones). I have tried Sub test() Dim myRange As Range Set myRange = Sheets(1).ListObjects(1).DataBodyRange myRange.WrapText = True End Sub Can anyone please help?

I have written a code to loop though range of cells and copy certain data in a column. But everytime I run the code it just copies the last record and not all of them. The issue is somewhere in the destination line of code where it can't find the last unused cell. Any help will be very...

Hi Team, plz help, I am trying to apply vlookup up formula. but its throwing error on both the formula, plz assist , where I am doing wrong. Thanks. Sub vlookuptesting() Dim wbk As Workbook Set wbk = Workbooks.Open(ThisWorkbook.Worksheets("sheet1").Range("b5").Value) Dim ws As Worksheet Set...

Hi all, First post and pretty excited... I'm new to VBA and I'm really just trying to learn it correctly from the start (whatever that actually means). I have a pretty straightforward piece of code that I have written - which works - and that's great. However, I am wondering if this is...

Option Explicit Private Sub CommandButton1_Click() Dim mynumber1 As Double mynumber1 = mynumber1textbox.Text Dim myrange As Range Set myrange = ActiveCell 'currently does not support user input for a particular cell myrange = "Table of " & mynumber1 Dim mymoverate As Single mymoverate...

Hello, I am using a macro to find & replace, but it work only when the cell has the value itself. I need the replace when he value contains in the cell, e.g. My knowledge in vba is almost null, please help me 1a = X A1...

Hi all, its my first day at work and par of it is to run a formula based on a UDF, which search for a value within a cell text string based on a column list, this list is almost 25000 rows. Since its searching for this many words in almost 35000 text strings, it takes about 40 min, which is...

Good evening, I am trying to loop through highlighted cells, to use the script below to anchor multiple cells within formulae: Sub ANCHOR() Dim MyRange As Range Dim MyCell As Range Set MyRange = Selection For Each MyCell In MyRange ActiveCell.Formula =...

Hi I pretty new to VBA and have a problem I need some help solving. I have one sheet with a range (MyRange) containing the sheet names I would like to loop through. If the sheet name matches the name in MyRange I would like the macro to create a pivottable on a sheet that already is created and...

hello fistly i work with excel and vb6.0 i have in excel sheet d3=1 d4=5 d5=10 I want increment myrange d3 to d5 with time enter in text1.text=1000ms but i found problem this code: Dim xl As New Excel.Application Dim xlw As Excel.Workbook Dim wsxlw As Excel.Worksheet Private Sub...

i need help with macro i have made a code to create new sheet with help of cells reference ("E2:AG2") there are around 20 sheets which are going to generate by macro(when the sheets are created they must link to Abstract sheet) There is a issue with making sheets when the new sheet created it...

I have a range (Myrange) with three columns, the first two (eg Name, Address) are filled and the third (eg Age) will be filled through a form. So I made a listbox with rowsource (Myrange) and the user will select his name and then an inputbox will ask for a numeric value. The value is inserted...

Good Afternoon, I have a VBA that needs a small tweek. The VBA that is capturing 4 columns and right now all the comments are going into one column. Basically what ever comments that are in columns A,B,C,D,E need to go into columns F,G,H,I,J. Thank you for taking time to read my thread and...

Hello All, I got this macro from this forum and it is working alright except for one little issue. When I run it, it hides all sheets (as it should) except for "Master" (again as it should), but it also leaves one last sheet visible. Why is that? Sub HideMultiSheets() Dim myRange As Range Dim...

Hello, I'm trying to make a VBA code that allow me to create new sheets with names corresponding to a values in a range, and then fill them. So, I have one sheet named "Team Statistics", with a table. With the first column ("A3:A14") I want to generate new sheets and rename them with each...

I am relatively new to VBA. Getting Run time error 1004: That name already taken. Try a different one. Here is what I have, I just recently added the Loop, but I don't think I need it, and believe its something simple I am missing or don't understand. Quick Background- Looks at a separate...

Excel 2010: Following code works if I pass a rectangular range but fails if I attempt to pass an entire column; I get runtime error 1004 (Application-defined or object-defined error) in the following code. Function GetRangeWithoutFirstNRows(inRange As Range, numRows As Integer) As Range Dim...

Hello, I'm trying to sort some data according to a column selected via a Message Box. The code I'm using is; Dim Answer As String Dim MyNote As String Dim RowCounter As Integer Dim MyRange As Range Range("A1").Select Selection.End(xlDown).Select RowCounter =...