My macro for some reason is not working. I want it to delete every row that has FALSE in Column A. I don't know what is wrong.
Sub deleteFalse()
Dim I As Long, trufalse As Long
With ActiveSheet
trufalse = . Range("a65536").End(xlUp).Row
For I = trufalse To 2 Step -1
If .Range("A" & I) = "FALSE" Then
Rows(I).Delete
End If
Next
End With
End Sub
My workbook is set up such that column B has dates (starting in B11 and going to B1200). C11:Z1200 has data that correspondes to the date in Column B. There are a lot of dates that don't have data. For example, row 15, there is a date in B15 but no other information for the remainder of row 15.
I'm trying to write a macro that will delete entire rows for the dates in which there is no data. So, I'm presuming that it would search C15:Z15, if there is not information in these cells, then delete row 15.
Row 16 becomes 15 when you delete 15.. I don't know how to get around this.
My company uses 4 types of barcodes 8, 12, 13, & 14 number barcodes for our products my problem is that I can't figure out how to force the barcode to format properly no matter how somebody enters it if they don't use spaces or put them in the wrong spots, I can't use custom formats because there is 4 different layouts
8 digit should be "#### ####"
12 digit should be "###### ######"
13 digit should be "# ###### ######"
14 digit should be "# ## ##### ######"
these barcodes are in columns L, M, & N also right now 'm using a formula in another cell to verify the barcodes by calculating the check digit and comparing it to the check digit typed the formula i'm using is
I have numerous hyperlinks in cells on a worksheet, next to these I have checkboxes. I am looking for a macro that will check if the boxes are checked and if not ignore them and if so run a certain macro.
View 6 Replies View RelatedI'm trying to repurpose this script I found so it deletes the row in an excel spreadsheet when it is checked. The current script just hides them. I'd also like to see ifthere is a way to have the row number automaticaly referenced via the checkboxes cell link so I woudn't have to make a custom macro for each row I want to have he checkbox delete feature.
Here is what I'm trying to repurpose:
Sub HideRows()
If Rows("9").RowHeight = 0 Then
Rows("9").Hidden = False
ActiveSheet.CheckBoxes("Check Box 346").Visible = True
Else
Rows("9").Hidden = True
ActiveSheet.CheckBoxes("Check Box 346").Visible = False
End If
End Sub
Suppose I have a excel sheet,in this sheet has 7 columns(A to G).I need to do with my sheet with this condition.
-Keep the rows that have the same value of datas in column A,C,G and they must have different datas in column E and F.
-The other row that not same as above condition must be deleted.
a code that can check the values of a row, and if it is equal to zero, or has no value in the cell, then delete the entire row. Let me know if you need more info or anything.
View 13 Replies View RelatedI am trying to search a column for specific values.... if the cells in the column equal X, Y, or Z then I want to keep them. Anything else, should be deleted....and not just the cell the entire row that it is in.
So I'd like it to search column E for a number of different values, if equal keep the data. If not (say E6 is not any of those values) then delete that row (all of row 6)
I am trying to write some code and I am lost.
Column Y-has Y, N entered in cells
Column R-has 1,2, etc... entered in cells (some cells have color index 26)
Column O-has 1, 2, etc... entered in cells (some cells have color index 3)
Column G-has names entered entered in cells (some cells have color index 38)
I need the macro to check if Column Y has a "N" and then if it does check Column R, O, G and if there is no color index in any of the Columns the macro will delete the row.
If Column Y has a "N" but Column R, O, G has a color index it will not delete the row.
There are 3000 rows on the spreadsheet and the macro would need to go through all the rows.
I receive thousands of raw data every week as shown in the excel sheet {raw data}
I would like to use a macro that could automatically sort the raw data like the format in the excel sheet {template}
For example:
Looking at the raw data and compare with the template, i would have to delete the whole columns that have (BU_CODE , EAN_CODE, SUPPLIER_CODE, SUPPLIER_NAME , BRAND_NAME, and SUB_CATEGORY_CODE) and add in columns and name it as Principal, Cateogry , Brand and range).
Sheet 1 holds aprox 30,000 lines of data, each line of data has values populated in columns A:P
Each row in column A holds a unique number (displayed as TEXT) made up of ddmmyy plus number in two digits, for exampls 18011209
how using code I can check each number through column A for duplicates and delete that particular row of data when found
im having a little trouble writing a macro to :
check if a7:t7 is empty, if so delete a6:t7 and change cell colour of a6:t7 to 'no fill'
I'm trying to check if a named range "ActiveCells" exists before deleting it in VBA but can't seem to get the syntax right, I have tried: If Range("Activecells") Is Nothing Then Resume Next Else: ActiveWorkbook.Names("ActiveCells").Delete
AND
If ActiveWorkbook.Names("Activecells") Is Nothing Then Resume Next Else: ActiveWorkbook.Names("ActiveCells").Delete
Can anyone point me in the right direction? I have tried searching but I can only find threads about checking for named objects or about using the toolbars to add/delete named ranges.
creating a macro I have two sheets named customer list (I have only put in 30 rows as an example but some sheets have 400 rows)
in the sheet named list column "F" are the names it should be cross checked with column "F" in the sheet named customer if it is there entire row to be deleted
I want to delete a sheet in a macro but when I run the macro, I always get a message warning and I have to answer the msg box to delete the page. Below is the macro command I am using.
Sheets("Tel").Select
ActiveWindow.SelectedSheets.Delete
This is Excel 2010 on Windows 7
Trying to figure out a VB Script but don't know where to start.
I have a sheet for each month. lets take September 2013
A Column with 200 Servers (A1:A200) on the Intranet listed as server-1/, Server-2/ Server-3 ... Server-200/
Each Server lists a location of a file for each day (31 columns per row)
I am trying to check for the existence of the files on each server (The Cells contain the URL and File Name in Range B2:AF201) starting with server-1 check the URL in B2 if it exists, go to C2, Continue with that row until the file check is False (The Page will show a 404 error) if not found delete cell url and continue. do this for all 200 rows
Basically, what I'm dealing with is an inventory system. When a cell value reaches below a certain quantity, we have a cell light up with the word "YES" (under the "re-order" column). What I'd like to do is have a macro that checks to see if that cell is populated with "YES" and if it is, to run another macro (which I already have written) that sends out an email notifying us of the need to re-order.
How it would work: The person pulling out the inventory would fill out this form and click "Submit"
submitbutton.jpg
I would then have a "call" code tied to the "Submit" button that when clicked, would run the macro to check cell population and send out the email. The email code is already written and works flawlessly on it's own. I just cant seem to figure out how to write a macro that checks for cell value and then runs it (or not) based on that.
I am having a sheet where I keep track of when online surveys have been sent to users. The users enail address (column K) may be on the list for several times, but I need to make sure that there is at least a 7 days pause between sending the first mail and the second, depending on the visit date (column G).If there are less than 7 days between two entries with the same email address, the user is not qualified for taking another survey.
I was thinking to write an IF formula which returns either 1 or 0 and then let conditional formatting highlight and HIDE the row via a VBA loop.
I'm at a point in the macro where I want to check a value.
Not sure how to write it.
Here's what I need.
If the value in B2
If I explain all the 8 steps , it will be lengthy and not easy to explain , thus I will go step by step
See file attached raw 01 , copy it on drive c directory called DISC , see file attached the result file
I want the the result file to go fetch data from the folder created DISC in which there is file called raw 01 and do the following with pulling headers , since the header is already plugged.
a to a
b to b
c to c
d is thus empty for the second step of the macro ( explain following after this fetching is achieved )
d to e
e to f
f to g
g to h
h to i
j to k
k it should not copy
we have a network of small routers and wifi aps. The Ip range has got a bit out of control so I would like to be able to audit it every once and a while.
how I could go through a set of IPs on a spreadsheet, open a telnet session or whatever, try pinging each ip individually, paste a response or no response in the adjacent column then move to the next ip in the first column (some sort of loop).
Time is not too much of an issue as I could run this overnight if need be.
As a response, the macro could just copy the last line of the ping eg
Minimum = 7ms, Maximum = 9ms, Average = 7ms
if it responds
or
Packets: Sent = 4, Received = 0, Lost = 4 (100% loss)
if it does not respond
Example
Col1 col 2
Ip
1.2.3.4 Packets: Sent = 4, Received = 0, Lost = 4 (100% loss)
4.5.6.7 Minimum = 7ms, Maximum = 9ms, Average = 7ms
5.6.7.8 Packets: Sent = 4, Received = 0, Lost = 4 (100% loss)
6.7.8.9 Minimum = 3ms, Maximum = 21ms, Average = 9ms
etc
I have a huge spreadsheet that has part numbers and quantity. I need to find the same part number and sum the quantity of that part number.
View 10 Replies View RelatedI have a button that runs a macro every 5 seconds.
I have another button to stop the loop.
Problem happens if a user hits the stop button when the sequence is not running - they get an error.
Here's my code for button 1 (start) and 2 (stop):
Code:
Sub Process_Emails_and_Backup_Auto()
Application.Run "Process_All_Emails_In_The_Inbox"
runtime1 = Now + TimeValue("00:00:05")
Application.OnTime runtime1, "Process_Emails_and_Backup_Auto"
End Sub
Sub StopProcessing()
Application.OnTime runtime1, "Process_Emails_and_Backup_Auto", , False
End Sub
Is there a way for button 2 - the StopProcessing macro - to run a test like If process is scheduled then run this code - if not then don't?
I have completed a formulation and included in a macro but I dont know about coding to check for specific cell string values before macro will take off. I want macro to check that if specific cell text are not matched, use MsgBox to display the wrong versus correct cell string text, then vbOK to exit macro. Also, if Range(B2:G2,J2) are completely blank, use MsgBox to display "missing data", then vbOK to exit macro.
cell B =REQ
cell C =SS
cell D =Current Stock
cell E =PO
cell F =Sales Order
cell G =In-coming
cell L =unit cost
If these cell texts (U or L case will do) are in their specific cells, macro will proceed. If either one or some of these cell texts are not matched, display MsgBox of the wrong and correct cell texts. Then button OK to stop macro run. If Range(B2:G2,J2) are completely blank, use MsgBox to display "missing data", then vbOK to exit macro.
I have designed a functioning userform which transfers the data (limited or complete) into the sheet. Along with the data and at the end of each row it automatically generates 4 checkboxes and links them to 4 offset cells.
This is where I hit a dead end. I am not sure which avenue is suitable or indeed possible. I want to click any checkboxes in the first COLUMN and as a result have it change the complete ROW colorindex of the background. I did achieve this with conditional formatting but it seemed to make the empty sheet bulking when saving and I cannot alter the font size which is another goal on the 3rd column of checkboxes. Am I waffling yet?
The 3rd column checkboxes I want to have the ROW font size drop to 3pt. The 2nd and 4th currently serve no purpose i.e. trigger nothing as a result.
I don’t think I can use the checkbox_click event as the boxes are generated for me so I don’t know which number they will be. The worksheet_change event and calculate event don’t seem to register when the linked cell goes to TRUE or back to FALSE. I tried using FORMS and CONTROLS checkboxes but neither has brought me success.
I was hoping the linkedcell would trigger an event and in turn select and manipulate the entire row in which the linked cell is located….
Due to my limited knowledge the code I have written/adapted to suit my needs may appear a little unorthodox? I hope that in itself is not a problem.
I have not managed to get the Controls Checkboxes to initalise blank. Currently they appear greyed out with a tick but fully usable? Of minor importance.
I can't attach the file because the blank sheet is 4.5MB?? so here is the main body of code from the userform. If you need anything else I will supply as required, however I can't get anyfiles under the attachment maximum of 48.8kb. My jpeg image was 108kb....
I did not want to bother you again but I have a problem that I can not solve it because my knowledge in vba etc, are limited and could not become to find with Macro Recorder.Usually I solve the problems on my own by searching on Google and experimenting with ready Macros and Macro Recorder.
I have an excel file with a macro and I want before this macro launched, to run another macro that can check if the headers have the correct name and in its correct position. The headers is in first Row.
If are not in the correct position or if it doesn't exist or if not have the correct name, then the process of the next macro be stopped and of course be informed that there is a problem.But if Is everything okay, then proceed to the next macro and be informed that Is everything okay.
I have attached a Sample file with the headers i'm using.
Sample...xlsm
[Code].....
I have a large spreadsheet that has thousands of hyperlinks that I would like to check periodically to make sure they are up to date. I have found dozens of examples of VBA code that will do this for me and seemingly very clear instructions on how to do it (for example this), but haven't yet been able to successfully run anything in my spreadsheet. It either doesn't do anything, or I get an error message of a bad file name.
View 2 Replies View RelatedI would like a macro to look through a sheet.
1. Unhide all Rows
2. Check through all cells in Row, If all cell values in row is either 0 or Empty then hide this row.
1 - If any cells (with data in it) in the "state" column contain any of the following abbreviations in it...
AB, BC, MB, PE, NB, NL, NS, NT, NU, ON, QC, SK, YT
Then all matching row cells in the column named "country" should say "Canada",
AND....(it must also meet this criteria)...
Criteria 2 - If any text in "Country" column is "Kryponite", AND "State" column is blank
If BOTH criteria 1&2 are met.....THEN...
then delete both the country & state columns
If not, keep both columns and highlight in light red any errors to this macro.
i have number of cells as below and i need to make macro to check last character in each cells if text the result will be 0 and if number the result will be 1
A1 42SRY239Acd2