Autofit Column Range By Column Number
Dec 17, 2012
I've been trying various syntax for an hour now and I cannot figure out how to reference a range of complete columns by column number.
I know this works
Code:
Worksheets(strWS).Columns("B:I").EntireColumn.AutoFit
But the number of columns is dynamic, so I don't know which one is the end. So I have the column number but cannot figure out how to reference the column range by number. I have tried versions of the code below but they all give different errors. This one is Run-time error 1004 Application-defined or object-defined error.
Code:
Worksheets(strWS).Columns(Cells(1, 2), Cells(1, lngLastCol)).EntireColumn.AutoFit
I am pretty sure I am close but the referencing is the issue. I can find all sorts of referencing by letter but not number. I've tried
Code:
Worksheets(strWS).Columns(Columns(2), Columns(lngLastCol)).EntireColumn.AutoFit
but I get the same error.
View 2 Replies
ADVERTISEMENT
Feb 2, 2009
I have some Worksheets in which cell A1 contains a textual heading for each Worksheet.
On each Worksheet, cells in the range A2 to O5 containg headings; the data goes in rows 6 onwards.
In VBA script, I'd like to autofit columns A to O, but starting at row 2 so the text in A1 is not included. For each sheet, I can determine the last row, to get a "range" to autofit (e.g. "A2:P15").
I've run a search on Autofit; the only examples I can find autofit the whole column or set of columns.
Is it possible to autofit starting at a specific row?
View 9 Replies
View Related
Jun 1, 2009
I'm trying to write a code that calculates 2nd column based on 3rd column's number or vice versa based on the condition set on the 1st column. Below, there are two procedures. "SimpleCalc" and "SimpleCalc2". I first wrote SimpleCalc2, but it isn't working, so I worked around the error by writing SimpleCalc, which selects a cell and moves around by offset. I personally find it hard to read and error prone as I develop more logic around it.
I'm trying to develop more function based on this code, so I need to make it neat and flexible. what I'm doing wrong in SimpleCalc2? Or do you have any suggestion to improve the code "SimpleCalc"? I'm using Excel 2003.
Sub SimpleCalc()
Dim SimpleMethodRng, SimpleMethod As String, i As Integer
ActiveWorkbook.Worksheets("Dashboard").Range("P5").Select
SimpleMethodRng = ActiveWorkbook.Worksheets("Dashboard").Range("N5:P12")
For i = 1 To 8
SimpleMethod = SimpleMethodRng(i, 1).........
View 3 Replies
View Related
Feb 19, 2009
I'm creating a macro that creates a co-ocurrence matrix from variables that are adjacent to each other.
In order to proceed, I need to know how to return the column number of the first (leftmost) column in a range that the user selects.
View 2 Replies
View Related
Jun 18, 2013
I just want to know how to Autofit Column width of Listbox.
View 12 Replies
View Related
Dec 9, 2009
I've got a Listbox in a User form that looks at data on another spreadsheet purely for informational purposes, not to be selected. I have two problems with what it's doing:
1) There are 23 columns, of varying widths. However the listbox uses a standard width, so some items are truncated and some have too much room.
2) The data changes, and the number of rows may change from 2 to 15000. I've set the RowSource to cover the ranged from A1:W15000, but if only 2-300 lines are selected the user can't grab the scrollbar button to scroll through, but must instead use the arrow, which is rather slow.
Is there any way to set the column widths to match the data, and the Range to only go as far as the last populated row?
View 7 Replies
View Related
Jun 16, 2012
I have to SET sh1, then activate sh1 before I can SET rng1. Is there a way to just...
Set rng1 = sh1.Range(Columns(1), Columns(11)) ' why doesn't this work?
Sub Raw_Sales()
Dim sh1 As Worksheet
Dim sh2 As Worksheet
Dim rng1 As Range
[Code]...
View 1 Replies
View Related
Oct 22, 2009
I'm still confused regarding a complex formula - rather n00b. Using Office 2007 with XP. Can't figure out with help or previous questions.
The following is what I would like this formula to accomplish. Picture included below.
Take all the values of column of C and add them together if and only if the corresponding date value in column A is during the month of January (and February, March, and so forth).
Event DateNameTotal Amount2/21/2009$4,5002/22/2009$04/3/2009$04/25/2009$9,0004/30/2009$8,3005/2/2009$9,0005/7/2009$5,5005/9/2009$9,0005/12/2009$3,000
View 9 Replies
View Related
Dec 15, 2011
When I'm moving around in an Excel sheet, I want to have a keyboard shortcut that Autofits only the column I am "in", and only to the width of the cell I'm "in". So I can arrow-key into a cell, hit ctrl-shift-W or whatever, and the column will autofit.
I try Cells.EntireColumn.AutoFit but that's not what I want, it autofits every column. Sometimes this is not appropriate and I want to do it manually for the columns I want auto-fit.
I guess the more general question is how do I write VBA code for the column I am in and not every column or a specific column - not Columns("A:I") or whatever, it's going to be a different column every time depending on what cell I'm editing.
View 2 Replies
View Related
Dec 9, 2009
I have named ranges in my excel sheet.I wish to however find out the column number from each of the names and use it as a variable for later calculations.How do I do this?
View 9 Replies
View Related
Jan 11, 2009
I would like to check a 4 column range to see if a particular number has been added to a range of number.
this is the formula that I wrote but it does not test beyond the 2nd column.
=IF(OR((MATCH(3,COLUMN_D)),(MATCH(3,column_c)),(MATCH(3,column_b)),(MATCH(3,Column_a))),3,"")
Does anyone have an different way of check for this?
View 12 Replies
View Related
Sep 4, 2009
I WANT it to search all of column A for the highest number in the range (which will change daily to a new high number above the highest currently), and return the value in column 4 (column D) that corresponds to that value from column A. This is what I have, but it is not working, it is giving me the number (1) in Cell A800 (which is the lowest valued number in my range. The numbers range in value from 1 to 762 with none repeating (they are sequential). The formula I have is :
=+VLOOKUP(MAX(A76:A2000),A76:I2000,4)
View 2 Replies
View Related
Jul 7, 2009
Is there an easy way (without writing my own conversion function) to get the column letter from a range object, as opposed to the column number?
View 5 Replies
View Related
Apr 20, 2012
I have a column of values I need to multiply by a random number (percentage) within a range of numbers (15%-22%).
How can this be done?
View 1 Replies
View Related
Feb 4, 2014
I have a long (~42,000) list of dates and times (some including zeros). I would like to name these ranges and use a formula to find the last entry in each column. I know the lists will never go over 45,000.
The data is in this format:
1/31/14
23:58:00
1/30/14
[Code]....
The data will not always be consecutive, so I imagine the criteria would be something like (if there were such a thing) "ISDATE" or something of the sort.
How would I write a formula to dynamically calculate the row number of the last date or time in the column? (In this case, it would be 6.)
View 9 Replies
View Related
Jul 8, 2012
I am having troubles finding a row number, using it to specify a range and then counting the cells containg values in that range.
This is what I have
Code:
Private Sub TextBox1_Change()
Dim test1 As String
Dim FoundRom As Range
Dim i as String
Dim abc1 As Range
Dim Core1 As String
test1 = TextBox1.Value
[Code] ........
I am thinking that I have my "Dim"'s wrong or something but I cant figure out how to define the range including the found row number and then count the number of cells containing data within that range...
View 8 Replies
View Related
Jul 28, 2014
need to understand the easiest way of highlighting the highest and lowest number in a range of cells several times in the same column.
As I said the cell range will be in the same column. So highlight the highest number green and lowest number red in cells a3 to a9 and then repeat the same process again in cells a11 to a17 and so on.the cell references are an example.
So I have several separate sets of numbers in the same column.
View 3 Replies
View Related
Oct 18, 2008
when the largest number in column B the hotel in column A should be in bold.
So in excel language IF(Number in B Is Max display corresponding hotel in column A as BOLD. But I can't figure out how to do this.
You can see here on the image:
additionalimage.gif
View 4 Replies
View Related
Dec 27, 2012
I have a spreadsheet with sales which I colour green when they are outstanding and red when they are despatched. I would like to automatically add a 1 in an adjoining column when the cell is green (eg outstanding) or zero when they are despatched so that it totals up the number of outstanding orders.
a b
172.95 (this column would be green)
024.00 (this cell would be red)
124.00 (this cell would be green)
132.25 (this cell would be green)
View 3 Replies
View Related
Apr 8, 2014
I work in a factory where we create different types of units daily. Below is a list of planned production on a specific date, say today's date. This is a very crude example, with information missing, and it is important to know that there are conditions attached such as:
The types are added randomly. The amount of types is much greater meaning that each type is on it's own page with breaks between. Everything produced on this date will have a URN (unique reference number) with its first 6 digits equating to yy-mm-dd and the last two being the position of the unit in the production sequence (first=01, second=02 etc).
I have gotten it to the point where if you enter them in sequence (Type A first for example) it will lookup to see the last assigned URN and taking the quantity into account issue the correct URNs.
The issues I have are when the URNs are less than "10", there is a problem displaying the 0 before the digit which disrupts the sequence. I can provide more clear examples if required.
Type A
Date08/04/2014
QtyURN
101314040801-03
203514040804-08
462114040809
123914040810-19
Total18
Type B
Date08/04/2014
QtyURN
245114040820
290114040821
689114040822
Total3
Type C
Date08/04/2014
QtyURN
1111414040823-36
211214040821-22
675514040823-27
Total21
View 2 Replies
View Related
Jan 14, 2014
I am creating a tool that is populating information off of another excel document and presenting the information in a different format then the data originally appears. Basically I am unsure how to create a formula, for example, in cell A1, that as I drag it down (A2, A3, etc) the column letter in the formula advances but the row number remains the same. In another words as the formula moves into cell A2, the "Sheet1!D3" changes to "Sheet1!E3", where as normally it would advance to "Sheet1!D4". I just started back up in excel, im sure this is way easier then I am making it seem but I have been unable to come up with a solution.
View 4 Replies
View Related
Feb 7, 2014
I have the following sample data set and I'm trying to return the appropriate column header based on criteria (i.e. DDD) and a number value which will be somewhere within the range of the table. In example below, the value returned should be Header 2 because the value is greater than those in Header 1 column (range H9 to L26).
Here's data table:
CriteriaHeader 1Header 2Header 3Header 4
ZZZ5.0015.0050.00130.00
ZZ5.0015.0050.00130.00
Z5.0015.0050.00130.00
YYY5.0015.0050.00130.00
YY5.0015.0050.00130.00
Y5.0015.0050.00130.00
DDD5.0015.0050.00130.00
DD5.0015.0025.0075.00
D5.0015.0020.0065.00
RRR5.0015.0015.0045.00
RR2.5010.0010.0030.00
R1.503.0010.0025.00
UUU0.751.505.0020.00
UU0.751.505.0020.00
U0.751.505.0020.00
P0.751.505.0020.00
T0.100.105.0018.00
CriteriaNumberValue
DDD10.00Header 1>>>=INDEX($I$9:$L$9,MATCH(I29,INDEX($I$10:$L$26,MATCH(H29,$H$10:$H$26),)))
View 3 Replies
View Related
Mar 17, 2014
Please see attached sample worksheet. Column A will be generated by the user manually.
I'm looking for a way in VBA to have A1:D20 in Sheet2 copied and pasted in the "Bank Reconciliation" Sheet based on how many "Markets" there are in Column A. Then, once that's complete to have A22:D30 (the smaller box in Sheet2) copied and pasted directly below those results.
I have what the macro would hopefully generate to the right in "Bank Reconciliation" (B6:E54) as an example. So if there's a market in A1, copy and paste the box to B6. If there's a market in A2, copy and paste the box directly below the first (B26) etc. etc. until it's done, then paste the smaller box directly below whatever the macro generates.
Book2.xlsx
View 3 Replies
View Related
Nov 5, 2008
I was wondering, is there a function that would take, lets say, every 4th cell value from a column and create another column consisting of every 4th number ?
View 2 Replies
View Related
Sep 5, 2013
I need formatting to highlight the dates in Column H if they are a greater than a week or more from Column G. Tried some different ways of doing this with the conditional formatting but cannot get it to work yet
View 12 Replies
View Related
Mar 6, 2014
I am trying to get the number of records/samples in column C between two dates in column A.
View 9 Replies
View Related
May 9, 2014
In my spreadsheet, I have a column for credit card totals (G) and cash totals (J)
I am adding the amounts for Food (Column B), Liquor (Column C), Wine (Column D), Beer (Column E), and Taxes ( Column F) for a total in Column G.
However, Column G is only for credit card totals and I want to do the same calculations for cash totals (Column J) using the same B through F Column without those numbers being plugged back into Column G, when I have no credit card total.
View 2 Replies
View Related
Jun 24, 2014
I have a spreadsheet with rows of data. I need a formula that will return the column number of the last column in a row where there is a value >0.
Let's say that cells A1:F1 contain values. Some have values of 0 while others have values >0. I need a formula in cell G1 that will tell me the column number of the last value >0.
A B C D E F
0 2 5 0 6 0
So the formula in G1 would return a value of 5, which corresponds to column E.
View 3 Replies
View Related
Nov 20, 2008
i have 2 sheets one called "IS" and the other called "AS" in cell a2 of "IS" is a number that i need to have excel look up in column a of "AS" once it find that number i need it to return the number thats in column e of that row to sheet "IS"column d. summary: a2 of "IS" looked up on sheet "AS" and returns the number in column e to cell d2 of "IS"
View 3 Replies
View Related
Apr 4, 2014
I have a 2 groups of column headings with a different month and year in each heading so
1st Group of columns range
Columns AJ through AX
Column Heading example "Expense Ratio February 2013......next Column over is "Expense Ratio March 2013"
2nd Group of columns range AY though CE
Column Heading example "Capital Balance February 2013......next Column over is "Capital Balance March 2013"
Each new month I need to add a new Expense Ratio column after the most recent expense ratio Column. (i.e. Find "Expense Ratio March 2013" and I need to add a column after that with heading "Expense Ratio April 2013"
Same thing for Capital Balance - add a new Capital Balance column after the most recent Capital Balance Column. (i.e. Find "Capital Balance March 2013" and I need to add a column after that for "Expense Ratio April 2013"
Because the ranges keep changing month over month, how do i do this.
View 4 Replies
View Related