i,d like to define variables,
a=2,7
i<j<k,m<n
5*a+10=i+j+k+m+n
i,j,k is defined in the process (i,j,k are three elements of a,a+1,a+2,a+3,a+4)
how do i define m,n.(two elements of a,a+1,a+2,a+3,a+4)
I am trying to define my variables with a for loop and if I run the code to the line after the first variable is defined, it shows that the variable is equal to the appropriate value, but after the for loop is done all of the variables are empty.
When I mouseover columnletter it shows "H" and when i mouseover avgRow it shows "2"... this info is right but I think the problem may be trying to combine a string and an integer value as a range. How can I do this so that celadr is the range H2?
Code to loop through worksheets 1 to 3 only and perform a certain task, and how to define the variables i.e. worksheets 1 to 3 when I am not using actual sheet numbers, but tab names. (worksheet 1 to 3 is just the positionof each tab).
What i need the code to do is perform a task on the first sheet, loop to the next sheet, perform the same task, until it has done the 3rd sheet.
I can't quite get this formula to give me the correct value.
imgur: the simple image sharer
I tried defining as a Range and I can't get it to work right either way. When I hover over my r1 and r2 values the range is correct but it does have "$A$227:$A$447" quotes around the range so I think that is messing me up.
I need it to cycle through whole numbers for three variables whose range I can define. I need this macro to test the result of all possible combinations of A, B and C, as is shown in the attached file. The initial range boundaries for each variable are as follows:
VariableABC Minimum1408 Maximum510012
So the macro should start with the following combination (1,40,8) then (2,40,8) then (3,40,8) etc until it reaches (5,100,12). I need the results for each combination to be posted at a separate sheet next to the corresponding combination.
Can a Function give two or more output variables. e.g.
Sub a() x = 5 result = Y(x) End Sub
Function Y (x As Integer) As Integer Dim B B = ... * x Y = ... * B
this will give back Y as a result. But if I want to get 2 or more output variables (let's say I need to get also B into sub) from one function, how should I do that? I need this because function works with large matrix and I want to extract some values appeared in between.
I'm trying to loop through a range in excel from access, checking where the titles (in Excel row 1) match with the fields (in a recordset in Access that is passed to the function) - and where they do, I want to dimension a variable to hold the column number - I'm not sure it's possible, but I'd be interested to know either way. The line I'm asking about is at the bottom of the code - the rest of the code is just to give context...
Sub ImportGeneric(rsImported As ADODB.Recordset, rsConfirmed As ADODB.Recordset) Dim fd As FileDialog Dim xl As New Excel.Application Dim wb As Excel.Workbook Dim ws As Worksheet Dim iFilePicked As Integer Dim strFilePath As String fd.Filters.clear fd.Filters.Add "Excel files", "*.xls" fd.ButtonName = "Select" iFilePicked = fd.Show If iFilePicked = -1 Then strFilePath = fd.SelectedItems(1) Else ..................
1. I am entering the prices of a hotel. And the hotel has different prices in different periods.
For ex: 03/07/212 - 04/06/21 128$
I don't want to define it as an array in Sheet1. I want to enter start date A1 and end date to A2 and the price A3. And to the next column next period definition and so on...
2. After I define all dates like this when I will create a date array at Sheet2 in A column, I need a formula to make excel call the values to column B automatically to the proper dates.
I created three large formula that together give me the nested if limit if I try to put it all in one cell. Therefore I defined a name for each formula and then created another formula using the names =IF
(Facil_Move,less_25_Miles,Greater_25_Miles) my problem is the cell with this formula will only display answers from the last portion of the formula. I want it to display each answer as the various conditions are met. So it should be an answer for "Facil_Move" or "Less_25_Miles" etc.
I have a different set numbers each day I need to average if they fit a certain criteria. These are actually times (in Military time) and in the 3 column spread sheet I have in column D the difference between column B and C. What I need to do now is find all the data from column A that is in between 1100 and 1500 and average all their column C results together. I need to do this for all 6 4 hour time frames (from the small table).
I am using this array: =AVERAGE(IF(B2:B14>1100,IFB2:B14
I want to define a Range() in VBA. have cell1 and Cell2 in the format of rows and cols. ie. Cell1 = Row 1, Col 2. Cell2 is dynamic, can be sometimes row100, Col200, or Row23, Col 1000. May i know how to define it in VBA?
I have dictionary defined as series of keys and let's say two values:
name1,val1A,val1B name2,val2A,val2B ...and so on
I would like to define named range from "name" column allowing user to select desired name from combo on another sheet. This is easy
But after that I would like to get val1 and val2 for selected name and show them with some calculation; For example to construct two columns like this: <nameX_selected_from_combo>, (<val1X>+<val2X>)/2
All the problem is how to select values from the same row as name selected in range.
i need to define a cell as text. How can this be done? The reason for this is because if I type 001 in a cell it will automatically turn that into 1. Also this formatting would need to be copyable. So if I copy and paste that cell template and put in say 002 it would still read 002
I have two columns containg the arrival and departure hours of workers. From these columns I must define the workshift by specifiyng the time range for each shift. AZ contain the arrival hours while BA the departure.
The formula I use doesn't return the results correctly because some shifts are almost the same. i.e: if shift one starts (arrival hours) between 05:00 and ends at 12:59 and shift 1-2 starts at 08:00 and ends at 23:59 then it will go with the first shift even though the times in range belong second shift.
I am looking for a solution to define a name by saving as. I think I'm almost there, but can't find the part where i can name it.
In steps:
1) Define the path and the name of the current file as string - to delete extension (=.csv) 2) Save current file as current name with .xls in folder where is current file saved before.
This is a part of my code - the part that is neccesary to see what I am doing: ...
Dim DRange As String Dim ERange As String Dim SRange As String EndRow = Range("A65536").End(xlUp).Row DRange = Range("D1", "Z" & EndRow) ERange = Range("E1", "Z" & EndRow) SRange = DRange
with the below code i want the highlighted in red (RC11) to refer to last column and last row.
Code: Sub try () Dim finalrow As Long Dim finalcol As Long Set wspo = Worksheets("Previous Order") wspo.Select finalrow = wspo.Cells(Rows.Count, 1).End(xlUp).Row finalcol = wspo.Cells(1, Columns.Count).End(xlToLeft).Column
I have a code that opens a workbook and then calls a function on the workbook. What I want to do is reference that workbook so that when the function ends I can make that the active workbook again.
This is my code
Code: Sub BarcLinkedCleanSort() Dim fNameAndPath As Variant, wb As Workbook Dim ws As Worksheet
Is there a way to define a name (Insert-->Name-->Define) for lines and/or shapes drawn using the Drawing toolbar?
I'd like to assign a specific name to a rectangle I've drawn outside of the sheet print limits. By using an If-Then formula, I'd like to bring that shape into a specified cell based on the conditions of the If-Then statement.
how to define the end of a range using a variable determined by a rng.Rows.Count command (or anything else)? Is this even possible? Here is what I currently have:
Set rng = Range("A1:A10000") For i = rng.Rows.Count To 1 Step -1 If rng.Cells(i).Value = "0" Then rng.Cells(i).EntireRow.Delete Next
I'd like to define the end of the range with more accuracy than I'm currently doing.
I have a userform which interfaces with a worksheet as a "front end" and includes a GetData macro that retrieves the relevant data from the worksheet based on the ContractNum value keyed into the ContractNum text box on the form as follows (in part): ...
I'm trying to define a range to be copied during execution of a macro. The range to be copied must include all contiguous data from a defined starting range to the rightmost column and the bottommost row containing data (boht of which can change depending on input data). I use <End>+<RightArrow> and <End>+DownArrow> to define the range when working in Excel (not under macro control).
I used the macro recorder to define the code for the process described above, with results shown below:
Sub Macro2() Sheets("Source_Info").Select Range("A2:D6").Select Range(Selection, Selection.End(xlToRight)).Select Range(Selection, Selection.End(xlDown)).Select Application.CutCopyMode = False Selection.Copy Sheets("Working_Data").Select Range("A2").Select ActiveSheet.Paste End Sub
When I run the macro, however, the End(xlToRight) and End(xlDown) commands do not have any effect (i.e., the rang is not made any bigger when these statements are executed).
I've used the same code in previous macros (with previous versions of Excel and Windows), and it worked fine. I'm running Excel 2003 under Windows XP Professional now.
this does not work, is there a possibility to do this? the index from where te values should be read is calculated in the macro, so i can not use fixed values.