To ensure correct data entry, I need to ensure that the filled cells in a column are always in Uppercase for example, irrespective of whether they are typed in upper or lower case.
I have found the following code, which seems to work quite well, even though I have the impression that it slowed my workbook down slightly.
We have a form that requires descriptive comments to be entered into several rows of merged cells. My goal is to have the form be able to automatically dropped down to the next row of merged cells when the current row of merged cells reaches a maximum number of characters.
And finally, the last row of merged cells would not allow any more characters than the maximum assigned but not advance to another cell automatically.
The rows I am working with specifically are: Merged Cells F23:R23; A24:R24; A25:R25; A26:R26;...A29:R29
I import a CSV file into Excel where the column title row has column titles that are just one long text string, without any spacing between the words. For example: CompanySiteDescription CompanySiteExternalSystemID IssueNumber
I would like a method (formula or macro) that would add a space-character before each uppercase letter (that's not the first letter in the string or an uppercase letter that directly follows another upper case letter). Thus: CompanySiteDescription becomes Company Site Description CompanySiteExternalSystemID becomes Company Site External System ID IssueNumber becomes Issue Number
Is there a way to format some particular colums so that when i enter my data into the cells i do not have to keep changing the caps lock to uppercase or pressing shift key which slow down my typing as i am not very fast typer.
I need to find a specific text in column D of sheet2 of my worksheet and copy that row to sheet1 to the last blank cell in column B. The macro should continue to search for the next text and copy rows only if there is active cells in the range column A : C of sheet2. I need a VBA code to do this.
I have a text file I am importing and using text-to-colums.
Some of the text is "+TOL" "-TOL" and when excel converts to columns it is forcing the text to a formula "=+Tol" "=-Tol" giving me #NAME? in those cells.
I can format the cells as text, which is fine for now since I'm using VBA, but if I need to use any formulas then I'm SOL...
For me this returns "Jan 14." However, I have a colleague using a Spanish version of Windows/Excel and therefore it displays this in Spanish as "ene 14."
How can I force the formula to return the English spelling, Jan 14?
I am using a MID fn to extract a single digit from a numeric string. I then use an IF Function to return a value based on the extracted digit. My IF statement works fine on manually entered digits but doesn't recognize my MID fn result. What am I missing?
I have a customised excel woorkbook that will be distributed to several locations with different computere systems, etc. I wanted to keep some convention with the naming, so I've put in a saveas routine to open the saveas dialog and change the default name. The user can then select the directory location and save the file.
Here's the Sub Saveas_routine() ' Dim strName As String
On Error Goto InvalidName strName = "E-RAMP " & Sheet1.Range("A1") & Format(Now, " dd-mmm-yyyy") & ".xls" Application.GetSaveAsFilename (strName) Exit Sub
InvalidName: MsgBox "The text: " & strName & " is not a valid file name.", vbCritical, "E-RAMP" End Sub
The problem is, when the save button is pressed in the saveas dialog, the dialog disappears and the the workbook doesn't save.
Is it possible to make a spreadsheet so that everything that is typed into it is in CAPITALS? I have a need for that for a spreadsheet that I am using at work, but I remembered that in the title box above it only capitlaizes the first letter. I thought if it can do it with the first letter can Excel do it with all of the letters.
A form loads and the first thing the user is to do is enter a specific date in a text box (preferably in, "mm/dd/yyyy" format.)
Is there any way to set up the text box so that when the form loads, the, "/"'s (slashes) are already in place? And can I set it up so that if the user enters in the date in any other manner aside from, "mm/dd/yyyy", that it will give them an error?
Finally, I want the user's date input to store on a worksheet (in row, "G".) So the first time the user uses the form, they type in a date and it stores the date in the FIRST AVAILABLE CELL IN ROW, "G." (example: "G1") The next time they use the form and type in a date, it is to store in, "G2", then in, "G3", ect. Each time they fill out the form, the new entry is to save in the next row beneath the previous entry.....
For other text boxes and combo boxes I have been using the following code to do this:
Sheets("Sheet1").Range("A" & intRow) = Text.Value (or Combobox.Value - depending on whether it was a text box or a combo box.)
Unfortunately I have NO idea how to apply this logic in regards to text boxes that are to store dates.
I have input cells on a protected sheet with a tab order array setup. It was originally set up to work when their was a Worksheet Change. Not every cell is going to have data input into it. This is where the problem lies. If a cell is left blank it tabs out of sequence. I changed it to a Worksheet Open Sub but that didn't work.
I have a spreadsheet in which has many different cells that need to be completed if another cell has data.
Examples
If the user inputs a name into A3, they must complete cells B3 thru D3. Cells B3:D3 contain different entry methods including a drop down list.
On the same sheet, if the user chooses GTD from a drop down list in cell U3, cells BA:BJ must be completed. And if they choose GCI from the drop down list in U3, they must complete cells BK:BR
I am trying to force users to enter data in 5 separate cells in a worksheet. I have tried editing code I have found here, but just can't get it to work.
It is in the second sheet of the workbook and the sheet is called Invoice - the cells I want to force entry into (and the message I need) are as follows.
J2 - You must enter the salesperson's name J4 - You must enter the customers name J5 - You must enter the customer's address J6 - You must enter the customer's postcode L2 - You must enter the Invoice number
I have an interesting question for everybody here. Let me see how to best explain it.
I start in the code making sure column Action Plan completion has a value in it. Copying in the issue modified column if neccesary.
'Back fill last modified 'I need to start with the first data row (3) and the action plan completion column Let intcurrentrow = 3 Let intcurrentcol = intactionplancompletion Do Until intcurrentrow > intmaxrow If Cells(intcurrentrow, intcurrentcol).Value = "" Then Let Cells(intcurrentrow, intcurrentcol).Value = Cells(intcurrentrow, intissuemodified).Value 'Need to ensure that everything is formatted as a date Let Cells(intcurrentrow, intcurrentcol).NumberFormat = "m/d/yy h:mm AM/PM" End If Let intcurrentrow = intcurrentrow + 1 Loop
Later, I place this formula in a given cell.
=If(I9="Open-Remediated",M9-K9, If(I9="Closed-Remediated and Validated",M9-K9,"" ))
The info I copied above is placed into the column K.
When I run the macro, the cell formula outputs "#value".
However, if I go double-click then enter the cell calculates just fine.
I've tried excels overall recalculate function, but that doesn't change this.
Does anybody know how to simulate a double-click on a cell?
I have a couple of active x text boxes that I am using in a user form to enter data to a sheet. I wasn't able to get the text to move to the next line, but I changed the Multiline and EnterKeyBehavior to True and now when I hit enter it is working how I want it to. But when I click ok on my user form it is putting the data where I want it but it is putting a symbol that looks like a ? with a border around it in where I am pressing enter. Is there a way to avoid having this symbol show up?
The other question I have is if it is possible for specific text to be Bold in the text box and some not? I haven't been able to figure out a solution for that.
Replace specific text within a defined range without having to select the sheet. I tried the following but this is obviously not the way to go.
Sub Open_Calls_Rename_Organizations() With Sheets("Open Calls").Range("Organizations") Cells.Replace What:="Institute Technology Code", Replacement:="ITC", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False End With End Sub
My question is about determining whether or not a particular letter is uppercase.
I've written code that reads from a text file one character at a time. And I know that the following determines if each character is equal to the letter "a".
I am using a form which has 3 text boxes and a list box. How do I copy the selection of a list box to the text box based on my active text box. So, if I was in text box1, and I click a selection in listbox1, it copies that selection to textbox 1, etc.