I know you can click a cell in a range, type ctrl-A, and select the current (used) region. Can you do this for a column? Select a cell in the column, type (?), and select the usedcells of that column.
View 3 Replies
I'm trying to make the below two column selections into a selected range to clear out formulas/values in the range.
Current code segments:
ActiveCell.EntireColumn.Select
Columns(ActiveSheet.UsedRange.Columns(ActiveSheet.UsedRange.Columns.Count).Column).EntireColumn.Select
Is there a way to combine the two code segments into one selected range?
setup:
Columns: c)6:00 AM, d)6:15 AM, e)6:30 AM
Rows: 4)tech1 Phone, 5)Tech2 Phone, 6)Tech3 Phone
What I am tying to do is to select the column that matches the time, for instance anything before 6 AM would select Column C, betweeb 6 and 6:14 still selects column C, 6:15 to 6:29 selects column D, Etc
I get an error 1004 with this
Sub SelectCurrentRegion()
Cells.Find(What:=InputBox("Enter the sheet name to delete"), After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) _
.Activate
Range("ActiveCell.Value").CurrentRegion.Select
End Sub
I can put Range("G2").CurrentRegion.Select and it works fine, but I need it to enter the value from the earlier find.
I have the following data:
column a: column B:
1
7
9
25
I need a formula to make column B equal to the current month adding the day in column A. so that column B equal the following:
column a: column B:
1 09/1/2009
7 09/7/2009
9 09/9/2009
25 09/25/2009
I have a sheet with a data in range A1:J9. I have a drop down list in each cell from A2:A100.
I'm trying to store all values in A1:J9 in an array using the property CurrentRegion.value like below
Code:
Arr=Range("A1").CurrentRegion.Value
The issue is that is taking as current region the range A1:J100, even if I don't have selected any value in the drop down list from A10:A100.
Is there a way to force CurrentRegion to select only values from A1:J9 ignoring the blanks dropdown list values or a similar way to load an array with values in a contiguous range?
I am trying to figure how to show in one pivot table a current column and a proposed column. I have 15k rows of data. My data columns are employee, month, task, hours, proposed month. I can get a table that has months as columns and tasks as rows with sum of hours. What I would like to do is incorporate the proposed month, so that it shows hours in the months by current and proposed. That way my result would be January current, January proposed columns etc. I can change the propsed months by formulae so I want to play with the proposed task month the refresh the pivot table to see the results.
View 2 Replies View RelatedI have userform with date pickers and have text boxes overlaid on these, when I select todays date from the date picker it does not display the current date in the text box (I have 8 date pickers on the userform). If I select another date then reselect the current date it works. It has occasionally worked but why.
Below is the code for populating the text box from the Date Picker.
Private Sub DTPicker1_Change()
TextBox1.Value = DTPicker1.Value
End Sub
The initialize userform code uses the following to format and set the textbox
Code:
TextBox1.Value = Format(Date, "dd-mmm-yy")
TextBox1.Value = ""
Windows 7 with Excel 2010
I'm try to do a sum function on certain a column and the range will vary each time, the column will also vary.
I have the numbers of the rows but I also have the numbers of the columns, how do I get the letter of the column so I can use it in =SUM?
i did cur_col = ActiveCell.Column but I need it to return a number.
How can I use this code but tell it to select all but the right-most column? I have this piece of code...
View 4 Replies View RelatedI need a formula that will look in an array and return the first non-zero value it finds to the left of the column where the formula is located. For example, in a row with the following values:
$12,000 $- $- $24,000 $- $-
I would like to place a formula below each cell (in the next row) that reviews the row above and returns the first non-zero value to the left of the location of the current cell so that the results look so:
$12,000 $12,000 $12,000 $24,000 $24,000 $24,000
I need to create a formula that will reference row 3 in whatever column it's in.
If I copy the formula down the whole column I need it to always reference the third cell from the top. I've got a value in that row that I need all the formulas to use.
I am using Excel 2010. I need to copy a list from any Column on the right to the existing Column. See the sample file.
View 10 Replies View RelatedI want to automatically populate C2 with the most current date from B9:B14.
I can't seem to figure out the formula.
How to add current date till the end of the column until data exists.
i used
With Range("A2")
.Value = Date
.NumberFormat = "mm/dd/yy"
A1 will have the heading and from A2 till data exists it should show the current date .i used above code it gives date in A2 but doesn't copy to the remaining rows.
From sheet1 on a checkbox click I am attempting to post the system date into sheet3 cell c3. If c3 already contains data then I want the cell selection to go down to the next row and post the date there. I if cell c3 has no data then it posts fine but if I need to goto the next row then I get a runtime error "object doesn't support this property or method".
If Me.GCN = True Then
If Not IsEmpty(Worksheets("GCN_Paid").Range("c3")) Then
Sheets(3).ActiveCell.Offset(1, 0).Select
Sheets(3).Range("c3") = Date
Else
Sheets(3).Range("c3") = Date
End If
End If
I have created a simple command button for tallying that will increase the count in the output cell by one every time it is clicked. It has basic code like this:
Private Sub ProductRegistration_Click()
[D4] = [D4] + 1
End Sub
On top of that, I want the output cell of this command button to switch every day. In this case, it would move to E4 tomorrow. The columns are dated but I can't figure out how to get the output cell to automatically change with the system date so I don't have to manually change it every day.
I'm trying to write a simple VBA code to loop through values in the range A14:A138 and based on the value (of a possible four values) in any row of that range, populate the adjacent column in the same row with a conditional result. For example if A14 = "Cat", then B14 = "I"; if instead A14 = "Dog", B14 = "II", etc. If there is no value in column A, the result should be blank (i.e. "").
I believe are in coding the destination range since I can get it to work for just one cell in B! Below is my code that is not working...
[Code].....
I have series of data values like below. I have to find Maximum, Minimum values for each of these values.
9430
9822
10070
[Code].....
I have 02 separate excel workbooks
01 = source file
02 = data list
The workbook "source file" contains all the data
The workbook "data list" contains data for work with Drop-down list. And i can easily select my required description by just dropping down the list.
In case, i have new description i add it in the source file and it is updated in the working "data list" sheet.
This applies to Field device column also. But i want to improve the selection criteria by creating such script or formula which could check the input of the description and automatically selects the field device and its relevant signal (output type).
Screen shot is attached : Automatic Selection.jpg
I am trying to find a macro that look for last non empty cell in column A and them paste a formula/comment in all cells of column B.
View 3 Replies View RelatedI have a vba script that matches a date on two sheets then copies a formula based on the location of the date, the problem I am having is how can I refer to the activecell and active column without typing them manually as the range will change each day. See vba script below:
VB:
Sub find_date()
Dim FindString As String
Dim Rng As Range
[Code]......
I have part of this routine working correctly. It will go and find the value I need and move to the next column using the Offset method, but now what am I doing wrong to try and get the code to select to the end of the current column?
Sub Find_First()
Dim FindString As String
Dim rng As Range
'FindString = InputBox("Enter a Search value")
FindString = Worksheets("Template").Range("A26").value
If Trim(FindString) <> "" Then
With Sheets("Service Level Score Paste Sheet").Range("A:A")
Set rng = .find(What:=FindString, _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
rng.Select...........................
I know that this could be a stupid question, but was wondering if it could be possible. I would like to select a column by a keyboard shortcut. If I would press a key combination adding the letter of a column as example F, it would select the whole column. I was trying to search for this in google, but no luck.
View 10 Replies View Relatedtrying to find the value of column A (date field) if it exists on the row that the cursor is presently on. I'm trying to check for the value before performing the next function to make sure the user is on a valid row. Cursor could be on any column A to F. Columns are always 6 but the rows can vary.
View 7 Replies View Relatedi have a sheet for monitoring sickness. i have used a macro before which automatically selects a range and emails it to recipients when i press a button. what i would like to do is have excel automatically choose the range for me based on today's day. in the attached example i would like column "A" copied along with the 5 columns before today's date, today's date column and also the 5 columns after today's date. paste the lot into an email and send. (i have highlghted the parts i would like copied and pasted into an email based on today's date (21st july).
View 4 Replies View RelatedCode to enter the current date in column if the values are entered in the adjacent column's.
View 2 Replies View RelatedThe first line of the code chooses the columns to select; all columns until there is no value. From there I need to have it sort those columns based on row 1. The problem is that the columns chosen are variable. It could be columns I:N (as shown below) or column G:Z or any other combination. (The code below was recorded if that matters at all.)
View 2 Replies View RelatedIn the attachment is a file, which allows me to specific a Column and hide. For Example enter "H" in the InputBox and Submit the Column "H" is hide.
What do i have to change in the code if i want to hide the "H" and the Column two columns next to "H". In this case "J".
HideColumn.xlsm
I have a sheet that begining in A3 and going down need to look for the First Instance of the text String "Loan Documents" and down to the last instance and select the corresponding range in column B.
Example: if the Text String appears in Range(A14:A32) I need the Range(B14:B32) to be my selected range.
