I'm trying to validate a string that can have only dots and numbers, but there can't be two dots in a row. String has to begin with a number and end to a dot
So these are ok
1.1.1.1.1.1.
and
2.452443.1.5.21.5.42131.
but
1..1.
and
1.1.t.
and
.1.1.
and
1.1
are not ok.
I have a cell that is acutally a concatination of several other cells. The formula is something like this....
=A1 & B1 & A1 & C1 & A1 & D1 & A1
Cell A1 contains the formula =char(13). This forces a line break between each data element.
My problem is that on some peoples machines the cell displays with a square at the end. I'm not sure why it does this only on some machines. Is there a better way to do this or is there a way to suppress the square?
Cell B4: 02/11/2008
Cell B7: Empty
Cell B8: Empty
Cell B9: Empty
Cell B10: Empty
Cell B11: Empty
Cell B12: Empty
Cell B13: Empty
Cell B14: Empty
B4 is a date format and I need to copy each single character from B4 so that it goes into the corresponding cells from B7 through to B14. So it looks like this:
Cell B4: 02/11/2008
Cell B7: 0
Cell B8: 2
Cell B9: 1
Cell B10: 1
Cell B11: 2
Cell B12: 0
Cell B13: 0
Cell B14: 8
I am not sure how to find the position of a character and put it into another cell, is anyone able to help me with this?
I need to store a known index, unknown value in a variable so I can increase the value and use it in a database. It is used as a version number for a part and the versions go like: "00" -> "AA" -> "AB" -> .... -> "AZ" -> "BA"... etc.
VB:
If tool.Worksheets("TRB Database").Cells(A, "R").Value <>
ThisWorkbook.Worksheets("Design Calculator, Q").Cells(7, "C").Value Or
tool.Worksheets("TRB Database").Cells(A, "AA").Value <>
ThisWorkbook.Worksheets("Design Calculator, Q").Cells(5, "K").Value Or tool.Worksheets("TRB Database")
[Code] ....
That is a part of the increase and when I try to increase "AA" by 1 it goes to "B" and not "AB".
VB: tool.Worksheets("TRB Database").Cells(row1, "D").Value = Chr(Asc(tool.Worksheets("TRB Database").Cells(A, "D").Value) + 1)
This is where I increase the value.
I have attached a sample file where I want to concatenate data in colums A2:H2 into one column with line breaks. But CHAR(10) function alonwith CONCATENATE is not working. I have formatted the destination cell for wrap text.
View 9 Replies View RelatedI want to create the user defined function in excel in which i will assign the value to a char and after that i should b able to use it in formula.
Eg: for "FL" i will assign 1
for "LF" i will assign 2
for "VV1" i will assign 3
for "VV2" i will assign 4
and so on.......then i want to use this to compare both figures like
i will put the formula like if(VV1 < VV2,true,false) result should b true coz VV1 is having value of 3 and VV2 is having 4.
So basically how we create the custom lists i want to give the priority to my own list and want to use it in formula.
I just found out the the line
Range("a1") = tbox.Text
only grabs the first 255 characters and leaves the rest behind. I have around 200 workbooks with textboxes in them and I need to get them onto the worksheets themselves.
Is it possible to set a PasswordChar for an InputBox?
Basically, I have an input box asking for an admin password to make changes, and I'd like to make it so onlookers wouldnt be able to see the password. Any suggestions on how to do this?
I could make another userform and have the textbox have a PasswordChar, but I'd rather not.
I'm new to this, and trying to get a spreadsheet organised for my nba fantasy team. To save time, (and me having to enter the positions of 300ish people individually) I'm trying to pull out their positions into seperate colums.
The data I am trying to pull is from these:
Jarrett Jack, Ind PG
Gerald Wallace, Cha SF, PF
=IF(FIND("PG",$B2),"PG","")
That is the formula I am trying to use, it finds the PG for some, but when it doesn't it gives me this "#VALUE!" in the cells, instead of a blank as I have tried to input.
Now, there are 5 combinations that I am trying to pull out: PG, SG, SF, PF and C.
There are multiple combinations that need to be pulled out, and placed into my 3 cells allocated (EG - 1 for Pg, 1 for SG, 1 for SF).
I have also found a flaw that takes the C from Cha (being the team) instead of from the position. Can I search for a individual C? I've tried to google these things, but I can't find an answer.
is there a way to automate =left(b1,40) and remove commas from the text?
text in the cell would be something like a name for instance john doe, LLC but some names are to long so was using the =left to reduce it to 40 characters and using find/replace for the commas replacing it with a space.
how I could split a cell's contents into two cells when it contains more than 1024 chars? The code would need to be clever enough to split the data after the nearest full stop before the 1024 char limit.
View 3 Replies View RelatedI need a slight mod to the below code which works perfectly otherwise. What it does is it divides whatever is in column K by 30 and puts in its relative cell in column M( There a bunch of mini tables below each other with blank rows in between).
The thing is sometimes there are characters in column K like "N/A" for instance and the macro crashes since its only designed to take into account numerical and blank cells in column K.
Is there any way to display one-third 1/3 in a Userform label control?
View 9 Replies View RelatedI have this forumala.
=RIGHT(A1,MIN(500,LEN(A1)))
I would like to apply this formula to VBA and call to existing macro so that this is applied to all the cells in Col. A. How can I do that? Or, is there a better way to do it?
Buttom line, I'd like to see only the last 500 characters per cells in Col. A after I run the macro.
I am having mucho problems because of Excel's 255 character limit when copying an entire spreadsheet to a new workbook.
In a nutshell, I copy a "data entry" page onto a “report” page within a workbook. The entire “report” page is then copied and moved into a new workbook. That allows me to have a stand alone, exported file outside of my main data entry tool. When you copy an entire page to a new workbook, Excel imposes a 255 character limit. Thus, I see truncated responses on the exported spreadsheet only.
This is really annoying, my formula is not picking up words starting with the letter "Y" it will pick "Y" up on its own but not if you start a word with that letter, see my attachment and change the word "Alpha" in column A to "Yoda" or something begining with "Y" and you will see what i mean.
View 2 Replies View RelatedData validation failed me here, so I resorted to VB to esnure only letters are entered in a certain cell. The code below is a mess and I need a hand to repair it. I can't figure out how to declare i . .
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("a59")) Is Nothing Then
If Target.Count > 1 Then Exit Sub
I have a string and I have to validate that it is entered in a particular format. The length has to be 12 and the characters should be entered in this format: XX1111/11XXX where X represents alphabet and 1 represents number. The "/" is a part of the string.
I tried using the Data---> Validate function and the problem I faced is that the code turns out to be very long and the formaula cell doesnt let me enter such a long formula. Is there any other way to do this without using a macro?
The formula I was trying is something like this.
=AND(LEN(A1)=12, CODE(LEFT(UPPER(A1),1))>64, CODE(LEFT(UPPER(A1),1))64, CODE(MID(UPPER(A1),2,1))64, CODE(MID(UPPER(A1),10,1))64, CODE(MID(UPPER(A1),11,1))64, CODE(MID(UPPER(A1),12,1))
We have an internal web site that has files I need to download daily. The filenames have date strings in them. I've setup some formulas to make the url based on the NEXT dated file I need to download.
And I don't have direct access to the drive the files are stored on, I can only get them through this web site.
Right now, I have individual macros for each file I need. They'll follow the url and download the file if it's there, or return a message to me if it's not. But there are several different files. I have to run each macro one at a time, at different intervals during the day until they get downloaded.
Is it possible to make a macro loop through all the URLs (I have them stored on a sheet, called "FileDownloader" in Range G2:G10) and check if the URL's are valid (without actually attempting to download the file). I can then make some kind of dashboard to tell me when the files are ready for download.
I have a spreadshhet which has data by month, year, week and bi-weekly. I would like everything to be monthly. How can I put a formula which will look up the cell and see if it monthly it will the value of the cell beside it, if it is weekly it will take the cell value and multiply by 2 and so on.
View 4 Replies View RelatedI have a range of cells (A1:A50). If "Hello" is written in any of those cells then a MsgBox says "Are you sure?". If vbYes the cell is colour coded blue. If vbNo then it is red.
The problem I have is that "Hello" may already exist within the above range. I only want the above to fire on the cell that has just been changed within the range.
I have some code but it checks every cell within the range whenever any cell is changed within the range. Whereas I just want it to fire on the active cell if that makes sense?
How can I validate that all values in a range of cell are the same, excluding
empty cells?
I have a database on one sheet and a 2 count if formulae recording information on the next to be exact one formulae counts the number of monthly values and the other count yearly values. I want the sum of these formulaes to be equal or less than 25. and to show an error if the sum of these is mor than 25.
View 9 Replies View RelatedI have a ComboBox on a UserForm. One of the fields that I fill in is a date.
After the date is entered I want to check if it's a valid date.
VB:
Private Sub cboEnterDate_Exit(ByVal Cancel As MSForms.ReturnBoolean)
' Make sure a valid date was entered, it must be in the format 2013/10/21.
On Error Goto ERR
'If Not IsDate(cboEnterDate.Value) Then
[Code] .....
ERR:
MsgBox "The date entered is not a valid date", vbInformation
Cancel = True
cboEnterDate_Enter
End Sub
The code:
VB:
'If Not IsDate(cboEnterDate.Value) Then
execute the If routine if I enter the date 2014/03/33
When I enter the date 2014/03/0001 it do not see it as an invalid date and exit the routine.
The code:
VB:
If Not IsDate(FormatDateTime(cboEnterDate.Value, vbShortDate)) Then
send the execution to the ERR routine if I enter 2014/03/33
When I enter the date 2014/03/0001 it do not see it as an invalid date and exit the routine.
How can I get the validation to catch the 2014/03/0001 as an invalid date as well.
I would like to simply validate the value entered to a cell against cells of a number of columns. I’d like it to return a vlue to be able to report it in another cell as below. (had to cmma separate the columns, can't get them aligned in this editor)
A, B, C, D, Q, R
1, b, 1, 2, 1, existing
or
A, B, C, D, Q, R
1, b, 1, 2, 5, not existing
So the user enters a value in cell Q to check against the other columns and return a value to R. Additionally, the cells to be validated (A - D) may contain more than one character, i.e. cell A could = 1b2.
I have to validate a cell to only accept the letter a, d ,f ,g h,. I know this is probaly very simple but i havent touched excel since last november and have completely forgotton the most simple of things!
View 4 Replies View RelatedI have a button that opens a workbook. What i need is if that workbook is already open then continue with the code. I know how to do this workbook.activate and error messages but I want to avoid activating the workbook. I was hoping there was a way to use something like on message resume next like when using error messages.
View 3 Replies View RelatedWhat is the best option to validate a value entered through the below prompt?
View 4 Replies View RelatedHow to check whether a cell contains email address or not..
For example:
if a cell contains xxxxxx@xxx.com or .in or .net , i want to show the cell type as email in next column.
I need to determine if excel cell contains any character except number If it contains any character then place 1 in adjacent cell for example, otherwise 0
Column                A                    B                          Â
150 000Â Â Â Â Â Â Â Â Â Â 1Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
150000Â Â Â Â Â Â Â Â Â Â Â 0Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
150,000Â Â Â Â Â Â Â Â Â Â 1Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
150.000Â Â Â Â Â Â Â Â Â Â 1Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â Â
150000 kzt     1                          Â
150000kzt       1