I am trying to tidy up a stock control program called Autopart (v20).
The problem I have is that suppliers descriptions use the " character instead of the word inch when describing products. This causes issues when reporting or comunicating to Microsoft Purchase Plus Ordering System.
Is there an easy way that I can remove alll of the " characters from the description cells in a text string?
I am using a macro do display actual date, by copy pasting special, so that the day and month is always 2 digits: ie. 01, 02, etc. in case less than 10.
Private Sub Workbook_Open()
Sheets("Sheet2"). Range("C4").Select
ActiveCell.FormulaR1C1 = "=TEXT(TODAY(),""dd"")"
Range("D4").Select
ActiveCell.FormulaR1C1 = "=TEXT(TODAY(),""mm"")"
Range("E4").Select
ActiveCell.FormulaR1C1 = "=TEXT(TODAY(),""yyyy"")"
Range("C4:E4").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("A4").Select
Sheets("Sheet2").Range("C4:D4").NumberFormat = "00"
End Sub
I paste special so the user does not see this formula. However, there is that annoying notification saying it is a number stored as text. What is the universal way to switch this warning off (or to better write the macro) so this warning will not be on any version of Excel?
I can't seem to find out how to use wildcards like "?" and "*" in the VBA- Replace("string","s*r","k") which should give "king"
View 3 Replies View RelatedI have a list of Hyperlinks in one column which have always a display name like:
Email
Homepage
Email
Homepage
etc.
Behind each Email or Homepage a Hyperlink is hidden. But for every Email address in my file the "text to display" is Email. find a macro which deletes all display names and shows me the hyperlink like this:
Peter@xyz.de
www.google.de
Carl.True@hotmail.com
www.msn.de
In my spreadsheet below I want to be able to enter a sales number for January, the value of cell F2.
I want cells F3 thru F12 to automatically calculate according to the "Growth Per Month" value in cell H1.
Example: If January sales are 20,000, then February should calculate to 21,000 (january * 105%).
Excel Jeanie HTMLSheet1
E F G H 1 2010 Per Month Sales XXX 5% 2 XXX XXX 3 February $ 10,000 4 March $ 5,000 XXX 5 April $ 2,500 6 May $ 1,250 7 June $ 625 8 July $ 313 9 XXX $ 156 10 September $ 78 XXX 11 October XXX 12 November $ 20 XXX 13 December $ 10 14 $ 39,990
Spreadsheet Formulas Cell Formula F3 =F2*10*H1 F4 =F3*10*H1 F5 =F4*10*H1 F6 =F5*10*H1 F7 =F6*10*H1 F8 =F7*10*H1 F9 =F8*10*H1 F10 =F9*10*H1 F11 =F10*10*H1 F12 =F11*10*H1 F13 =F12*10*H1 F14 =SUM(F2:F13)
As shown in the below image. I have some data from A13 to I 13. Currently if I put the cursor on A13 and press DELETE button then all the formatting from A13 to I13 goes off. But the data still remain there.
Is it possible then when I press DELETE the content of A13 then all the data from B13 to I13 should also get deleted ?
Excel Jeanie HTMLSheet2 *ABCDEFGHI13Key FieldEmp 11 2 4 8 5 3 7 Excel tables to the web >> Excel Jeanie HTML 4
On the sheets where 'present' needs to be checked, after linking the checkbox to the cell it now says "TRUE" or "FALSE". How do I get rid of that? There is a formula that this affects also (just FYI).
View 3 Replies View RelatedI have a spreadsheet with about 20,000 lines. (The number of rows fluctuate) I need a macro to remove (delete) rows that contains the phrase "Off Peak" and "Weekend"
I was setting it up in a loop but I don't know how to make the loop end after ALL the "Off Peak" and "Weekend" info is removed.
My macro just does a find then delete the row and then loop to the find again. Is there an easier way and can the "Off Peak" and "Weekend" statements be combined into one search
Do While
Cells.Find(What:=" Off Peak", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
ActiveCell.Select
Selection.EntireRow.Delete
Loop
i tried method like mid() with concatenate() to add in "0" after "/" to the below:
to make the format as in this standard: PD13/05-06/10/02
PD13/05-06/06/02
PD13/09-10/10/02
PW08/30-31/01/01
PA13/35-36/14/02
I would like to write a function that enhances conditional formatting capabilities in this way: suppose that cell(4,5) contains a number that can be 0 to 5
in the adiacent cell(4,6) i want to put a function that:
1) write "NO DATA", "HIGH", "GOOD", "MODERATE", "POOR", "BAD" depending on that value
2)Choose color font depending on value
3)Choose color background depending on value
I wrote this piece of
Public Function StatusResponse(AdiacentCell As Range) As String
Dim thisStatus As String
Dim ThisFontColor As Integer
Dim ThisbkColor As Integer
Select Case AdiacentCell.Cells(1, 1)
Case Is = 0
ThisbkColor = 2
ThisFontColor = 1
StatusResponse = "NO DATA"............
provide a vba script to replace characters from a string.
I have the following script which has the cell address as the string and want to remove the dollar signs.
Code:
Dim C1 as string
C1 = ActiveCell.Address
With C1
.Replace "$", "", xlPart
End With
I want to remove a string of text from the front and rear of a cell value and would like to do it with one formula. I have tried using LEFT,RIGHT and LEN. I would Like to use the SUBSTITUTE formula as the user can define the actual string to be removed.
I can achieve want i want using two columns i would just like to be able to consolidate down to one.I have tried nesting the formulas but i always seem to get an error.
Characters to remove
Raw data
Output
Front
dog
dogcatmouse
cat
Rear
mouse
dogratmouse
rat
Assume that the table uses stadard naming conventions for Columns(a,b,c...) and Rows(1,2,3...)
I have a large worksheet and I managed to duplicate data in a row of cells.
MOT 1/F1,
B/P 1f2,
B/P 1f2
In the string above I need to delete all text from the first comma to the end of the string so the above would look like:
MOT 1/F1
This is an example in one cell of many. The text prior to the first comma may or may not repeat and it is the only portion of the text I wish to keep. The first comma is not always in the same place (character count position).
I need to remove only numbers from excel cell - I have tried using the "constant" function but did not work. I have thousands of cells with a consistent 4 digit number like this:
1000 the rest is text
How can I remove only numbers but leave all text in the cell and then if I can trim the cell so there are not any spaces at the beginning afte removing the numbers.
How can any string valid for the name of a workbook be converted to a string correctly recognized by Application.Run? Sometimes a string is not really recognized as a string. See for example: .....
View 9 Replies View RelatedI'm setting up a workbook where users will select a saved workbook from a network drive (using Application.Dialogs(xlDialogOpen).Show); the macro will then open the selected file and pull data from select columns in that workbook and paste it into the summary workbook which holds my code.
The column into which the data will be pasted will vary by source workbook, so I'm using application.inputbox to have the user provide the first column into which data should be pasted for the selected workbook. Each workbook will have data that needs to go into two side-by-side columns, so rather than asking the user to input another alpha column header, I want to just increment the original input to represent the next column, so I can use that in my code.
Since the data is coming in as text, does anyone have an eloquent way to increment it, taking into account the rollover each time the final character is 'Z'? I thought about defining the inputbox variable as a column and using offset, but that isn't an option in the dim/as autocode. This code will primarily be used in Excel2007, but ideally would also work in 2003.
I make downloads from SAP and they come in the following format:
#.###,##
This is the number format we usually use in Norway.
The problem is that Excel don't understand that for example 1.234,99 is a number because of the ".". They way to fix this manually is to use Replace "." with "". This translates into the following VBA
Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Using this macro will make the following changes:
1.234,99 -> 1234,99
4,2 -> 42
The first is exactly what I wanted (text -> number), but an unwanted side effect is that Excel believes that "." is the decimal separator when faced with a number.
An obvious way to solve this would be to convert everything into text first, but the only way I could think of to do this is as follows:
1) Adding a character before or after every number in a new column (number -> text)
2) Replace "." in the new column
3) Delete character (text -> number)
4) Copy back to the original column
I have some code that I am using to import the source code of multiple websites, or at least that is the end goal. I currently can make it import one website but i can't find a way to change the website as i loop the line i need to change is this
*The website link won't work, it is a log in only site, but i think there should be an easy fix but since i am only self taught i don't think i understand the basics behind why thimngs work
I have column A which i have sorted which contains some cells with an * and some without, like this:
07:30 - 08:00
07:30 - 08:00 *
What I want to do is remove the extra space and * wherever they are present in column A without a manual replace
Excel 2003. UserForm. anyway to hide/remove the Close X in the upper right hind side of the Title bar of a user form?
View 2 Replies View RelatedI am comparing to columns of data from MS Project using Excel. In one column are the resource names for the project tasks. In addition to the names are the designations for % utilized. So the column's data will look like this:
John Jones[15%],Mary Smith, Fred Arguello[240%].
I want to compare this column with another resource names column which will never have utilization values - only the names.
In order to do that I need to "mask" the non alpha characters out of the first string.
I have textstrings with numbers followed by a ":" which I want to be deleted.
Example : "This text 15:100 must be 1:1 cleaned 1 up:"
I want to have it : "This text 100 must be 1 cleaned 1 up:"
So only the numbers before the ":" together with the (following) ":" to be deleted and not the numbers following the ":", and not the numbers without the ":".
=IF(ISERROR(F16-K16),"",IF(SUM(F16-K16>0),"",SUM(F16-K16)))
Cells F16 & K16 can either contain a "Null String" ("") or a number created
from another IF statement , from these 2 Cells I need another calculation,
if the error "#Value" is made I want it to be blank, If the number is >0, I
want it to be blank, but if it's a number I want it to appear.
I want to convert "851&3&&9" string in an excel sheet to the below format:
851
853
854
855
856
857
858
859
Note:whenever "&" comes in string it should print 851 and 853 skipping 852.Likewise if "&&" comes in the string the numbers will printed in continuation,i.e, 853,854,...,859.
I have been trying to remove or disable the message on update to other worksheet " To update all linked click yes......" I have try the following unsuccessfully
Sub auto_open()
Application.AskToUpdateLinks = False
End Sub
On the menu bar choose Edit ---> Links Can not choose manual, as the option is grey out (disable) I would prefer a vba solution, but I am open to anything to get rid of this message
Replacing a sequence of characters such as NUK 00100 with NUK00100000
Essentially, the code will just need to remove the space & to suffix those 3 zeros onto the end of the sequence.
I have text like this in my cells:
ABCD-234BN
ANC-23FD
AFLDDS-23
I would like to simply remove all of the character after the "-", including the "-". Since the dash is in a different spot, I can't just use the MID or LEFT function.
I have a number like this 01869.247098 but i need to get rid of the "." that is in the middle.
View 9 Replies View RelatedIs there any way to remove the first part of a string of text in a cell and save the second part?
The first part of the text string is a team code that has a variable number of numbers, capital letters and sometimes spaces. The second part of the text string is a variable number of words in a team name that all start with a capital letter and have lower case letters. Every line has a different team code and team name.
The original spreadsheet also has a column with just team code. Is there a way of using this column to "subtract" the team code from the text string to just leave the team name?
In column A, I have the following values:
build
chil rat
datcen
mang
nextg
ost rat
omp
sco rat
In column B, I need the formula so it shows values that if column A = "build", "nextg" or "datcen", then the value in column B is "nextg" and if column A = "chil rat", "ost rat", "sco rat", then the value in column B is "mig". For everything else, it should be blank.