How To Merge Two Rows If Specific Cell Is Blank

Apr 4, 2012

I'm trying to figure out the if conditions for this relatively simple problem. Basically, this is an import from a word document where the table strays onto a new page. I want to try and repair this with a bit of VBA.

This is what it looks like:

1: cell 1 |the content should all be in this cell
2: |but the import sometimes splits it into two
3: cell 2 |

Basically if and only if cell Ax is blank (in this example A2), then I want the rows to merge each cell and repair the table.

View 1 Replies

Excluding Rows Containing A Specific Blank Cell From Logic

May 1, 2006

how to exclude a blanck cell from logic?

I have tried what you see below but neither works as desired.

If Not vData(n, 9) = 0 Then

If Not vData(n, 9)Is null Then

have corrected code error

View 9 Replies View Related

Insert And Merge Blank Rows?

May 23, 2013

I have a spreadsheet that I need to insert a blank row every other row and then merge that blank row. I can do this with the macro below. My question is that I only want the merge on each blank row to merge A:H. Example would be insert row 9 and merge A9:H9. Insert row 11 and merge A11:H11. and so on till the end.

Code:
Sub insertrow()
Application.ScreenUpdating = False
Rows("9").Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.EntireRow.Insert
ActiveCell.EntireRow.Merge
ActiveCell.Offset(2, 0).Select
Loop
Application.ScreenUpdating = True
End Sub

View 2 Replies View Related

Remove Blank Rows, And Merge Into New Worksheet

Aug 27, 2009

I am a CAD person, trying to edit a large spreadsheet for reading into CAD.

I need to merge 2 worksheets into a 3rd.
Then search and delete the blank rows. (There is only 3 columns in the document, but can be as many as 5,000 rows or more)

The Cad program does not like blank rows, so I have to delete them if users insert them, and there may be several in a row. (Users need only edit one of the worksheet, No. 2)

The 3rd worksheet must then be saved to a Tab-Delimited txt file in the same location on the network as the xls document.

I am able to select the worksheets and copy to a 3rd, but how to go to the end of the data, before merging the other data from the 1st worksheet into the third.

View 9 Replies View Related

Combine/merge Row Cells Text Between Blank Rows

Jun 14, 2009

I have a large list of text in one column which i need to combine between blank rows into one cell or a new column, the number of rows to be combined varies.

for example

aa
bb

ww
xx
zz

rr

gg
hh
ii
jj

would become

aa bb
ww xx zz
rr
gg hh ii jj

I have over 30000 lines so doing it by hand is not an option.

View 9 Replies View Related

Delete Tab(s) If Specific Rows Are Blank

Jan 31, 2008

A macro that will delete a tab or tabs in a file if and only if rows 11, 13, 23 & 25 are completely blank within that tab?
So basically ALL rows would need to be blank, if there is any data within any of those rows, then tab should NOT be deleted.

View 9 Replies View Related

Insert Blank Rows Indicated At Specific Points

Oct 17, 2009

I want to insert blanks rows above rows that have the number 1 inserted in column C.

I about 60,000 rows in all, doing it manually takes forever because I have to keep waiting for Excel to push the rows down every time I insert a new row.

Is there an efficient way to grab all the rows with a 1 in column C and insert rows in one swoop? If not, I will settle for any way other than manually.

View 9 Replies View Related

Identify Which Rows Have Blank Values In Specific Columns?

Feb 19, 2013

I have a spreadsheet with columns and columns of data. What I'd like to do is identify which rows have blank/no data in all specified columns (H, K, O, S, U, W, and Y).

To clarify, I need to identify each row where all of these columns are blank (as opposed to each row where at least 1 column is blank).

View 3 Replies View Related

Add Blank Rows After Every Paragraph Having Same Title With Specific Range

Nov 26, 2013

I have a data copied from pdf to excel and need to segregate the data page wise so i need a macro to set the pages in specific cells example page 1 ranging from A1 to A60

Page 2 ranging from A61 to A120 and so on

Example of pdf data

PAGE 1 Should be in cell(A1 to A60) - Data can be less than cell A60 but page 1 should be within this range

A 1
CHURCH 6
HOUSE 5

[Code] ......

PAGE 2 Should be in cell(A61 to A120) - Data can be less than cell A120 but page 2 should be within this range

A 1
CHURCH 6
HOUSE 5

[Code] ........

View 1 Replies View Related

Delete Rows With Blank Cells In A Specific Range

Feb 23, 2010

I need a VBA to delete rows with blank cells within columns F - AZ
Columns A - E contain headers but also need to be deleted if cells in columns F -AZ are blank.

View 9 Replies View Related

Macro To Copy Rows Containing Specific Blank Cells To Another Workbook

Jan 30, 2013

I have spreadsheet of data, I need to extract any rows that have blanks cells in columns F or P or T.

If possible I would like a macro I could run that would cut all of the rows that meet the above criteria and paste them in to a separate sheet.

View 2 Replies View Related

Select / Activate Specific Row Then Copy Format / Formula To All Blank Rows

Jan 21, 2012

I need a code that will copy the format AND formulas of the entire row that I have selected (or activatedwith my cursor) to each and every blank row - until it gets to the last row of data on this spreadsheet.Since any employee could have more than 1 row of data - I am using a code that inserts1 blank row after each NEW employee name.

NOTE: This report is initially sorted by employee name so that each occurrence is grouped together.REPORT SPECIFICS:1) This report reflects typical paryoll information.2) Certain columns have data that is either in text, general, or number ($) format3) The number of columns may vary depending on which PR report is being worked4) For the sake of simplicity - we can assume that the column titles will always be across row 15) Each employee name on this report may repeat several times depending on how many weeks they worked,so the SUM() formula should adjust automatically to capture all the rows of data to add up for each employee

HERE IS MY SPREADSHEET:
texttexttexttexttextformulaformulaformulaDeptDivEmployee NameEE#Period EndHrs WorkedPTOAccrd LiabilityCSDINSEWilma Wilsont4561/7/1280.5$ 100.00 CSDINSEWilma Wilsont4561/16/12121$ 200.00 CSDINNECage Nick2581/7/1281$ 600.00 CSDINNECage Nick2581/16/12245$ 25.00 CSDINNECage Nick2581/23/12323$ 25.00 CSDINWPolly Cracker1781/7/12856$ 60.00 CSDINWPolly Cracker1781/16/12242$ 654.00 ARVIPWPolly Cracker1781/23/12322$ 2.00 ARVIPWPolly Cracker1781/28/12161$ 5.00 ARVIPWPolly Cracker1782/6/1284$ 3.00 CSDINSEDim Sum6871/7/1284$ 65.00 CSDINSEDim Sum6871/16/12126$ 5.00

HERE IS MY CODE TO INSERT 1 ROW
Sub InsertRowAtNewNameONE()Dim LR As Long, i As LongLR = Range("C" & Rows.Count).End(xlUp).RowFor i = LR To 2 Step -1If Range("C" & i).Value Range("C" & i - 1).Value Then Rows(i).InsertNext iEnd Sub

NOTE: See below: I will format and add formulas where I need on the 1st blank row that was createdand I need a code that will copy this particular row to all blank rows to the last.

recordtexttexttexttextcountformulaformulaformulaDeptDivEmployee NameEE#Period EndHrs WorkedPTOAccrd LiabilityCSDINSEWilma Wilsont4561/7/1280.5$ 100.00 CSDINSEWilma Wilsont4561/16/12121$ 200.00 2201.5$ 300.00

View 5 Replies View Related

VBA - Delete Row Where Specific Cell Is Blank

Aug 30, 2012

I have written such loop which I want to delete entire row when a given cell is empty:

Code:
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
For Counter = lastrow To 2 Step -1
If Cells(Counter, 6).Value = "" Then
Selection.Rows(Counter).EntireRow.Delete
End If
Next

It works not the way I want. It has ommited some blank rows and also removes 5th row everytime I run it.

View 3 Replies View Related

Populate First Blank Cell In Row With Specific Text Value?

May 28, 2014

I am trying to use VBA to populate the first blank cell in row 6 with the word "Short"

I keep getting sub or function not defined and I am sure its because I am trying to Frankenstein some code together to get it to work. So far everything works as I need but this last step.

View 1 Replies View Related

Entering Data In 1st Blank Cell In Specific Row

Mar 5, 2014

I have created a form where a date and remark is added every few days. I am using Phone Number as the base of VLookup. I want a code so that the date and remark which is entered in a Text Box, is stored in the first available blank cell pertaining to that employee. I want the first date and remark to be under "Date 1" and "Remark 1".

Thereafter, if another remark is subsequently added for that employee, the form would ask to enter his phone number to identify which employee the remark pertains to. Then the Text Box where remark is entered should be stored under "Remark 1" if there has been no remark before, "Remark 2" if "Remark 1" already exists, "Remark 3" if "Remark 2" already exists and so on.

I do not want to enter it in a new row. I want to enter the remark in the next blank cell of the row which matches the employee Phone Number.

Untitled.png

View 5 Replies View Related

How To Insert Blank Row Below A Cell Containing Specific Text

Oct 19, 2009

I was wondering if someone might be able to assist me with using VB to insert a new row below a cell containing specific text.

For example:

- All of my data is in column A

-I want to scan all of column A, and if there is a cell that contains "ACHCAMERIGROUP M", then I want a blank row inserted below it. If column A does NOT contain that text....do nothing.

View 5 Replies View Related

Hide Columns If Cell In Specific Row Is Blank

Jan 19, 2007

I have a row in a table from columns C to CZ. All the cells in the row contain a formula, between 1 and 204 cells in the row will have a value (i.e. will not be blank).

The cells with a value will start at column C and may or may not have a blank cell before no more values and blank cells to the end (Col GZ).

Example:

C D E F G H I J K >..........................GZ

23 34 67 74 2 34 6 2 56 all blank ("") to end

or:

C D E F G H I J K >..........................GZ

23 34 67 "" "" 34 6 all blank ("") to end

I need to hide the entire columns when the cells in this row are blank but NOT if the blank cell has valued cells after it (i.e. do not hide columns F and G in the second example.

I can do this by looping back from col GZ and hiding the columns one at a time, which is very slow. I am stuck on the code to select all the relavent columns and hide together.

View 4 Replies View Related

Putting Specific Value In Blank Cells In Same Row Based On Value In 1st Cell?

Jul 18, 2013

i am trying to Put a specific value i,e "NO Deliveries" in blank Cells in the same row based on value in 1st cell of the Row which has a fixed value . note:the columns and rows are dynamic for example: I want to put the value "no Deliveries" in cell C because its blank.

A B C D

% of Availability
0.00%

80.00%

View 9 Replies View Related

Add Stipulation That Specific Cell Must Not Be Blank To Existing Code

Oct 21, 2013

I have a code now that in excel, when the button is clicked, will put file into a new email and format the email.

What I have been trying to do, is make it so that if Cell C10 is blank, you get a prompt telling you it must be filled out before you can proceed with the submission.

Here is the code now:

Sub SendTimeCard()
On Error GoTo err_handler
Dim OutApp As Object
Dim OutMail As Object

Dim subject As String
Dim body As String
' Be sure the workbook is saved first
ThisWorkbook.Save

[Code] ........

View 2 Replies View Related

How To Merge Values With Blank Cells Above Or Below Them

Jan 20, 2014

I have a column which contains unique values and also blank cells between them. These blank cells are associated with the cells having value below them. e.g.

Say we have

COLUMN A

1004Z
blank cell
blank cell
blank cell
blank cell
1031Z
1305Z
1007Z
1046Z
blank cell
blank cell
1400Z
blank cell
1021Z

Suppose these above are 14 cells (A1:A14); I want to merge preceding set of blank cells with the values below them.... in this example I want to merge A2,A3,A4,A5 with value in A6...

Likewise A10,A11 merge with A12 to show value in A12.

I have only one column to merge values like this.

View 2 Replies View Related

Import From Specific Folder - Merge And Find

Apr 4, 2014

I have the attached xl. I want to make import from a specific folder other xl files and after that I want the sheet 1 to find if the values in column g and m (together in the same time) can find it in other xl files. If yes then this values in sheet 1 must turn to red. Can this done?

View 1 Replies View Related

Find Specific Word In Different Worksheets And Merge The Whole Row In 1 Worksheet

Mar 23, 2009

In my attached file, I've atttached a sample whereby in Sheet1 to Sheet3 I have data with the same format.

I want to copy all data with TD_SUB_ACNT_CODE = ETMY0100 into Sheet4. My actual data actually have more than 10 sheets and the sheet count can be more.

View 2 Replies View Related

Insert Blank Cell After Every 10 Rows

Mar 15, 2013

I have in column D 1200 rows of data. I need to insert a blank cell after every 10 rows. Is there a formula or code to do this?

View 9 Replies View Related

Delete Rows Without A Specific Value In A Cell

Jun 2, 2008

I have 2 spreadsheets of delivery information. Sheet 1 contains data of all stores in the UK with addresses. Sheet 2 containts contacts of all stores that promotional matrial needs to be sent to.

The only common cell in a column of 4 digit store numbers.

I need to delete all rows from sheet 1 that do not contain a value in the store number column that is displayed on sheet 2.

View 11 Replies View Related

Insert A Blank Rows Based On Cell Value

Aug 26, 2009

I am trying to write a macro which will insert a blank row at the end of each year(A column) (Last cell i.e Dec 95 and so on).

I have attached the file for the same ....

View 13 Replies View Related

Delete ALL Rows That Have Cell In Column (J) That Looks Blank

Feb 11, 2010

I'm trying to delete rows which has columns that appears to be blank. Below code worked fine but it took about 15 min for the macro to work through the spreadsheet.

View 2 Replies View Related

Hide Rows In Table If Cell Is Blank?

Mar 9, 2014

I'm trying to create a table that adjusts dynamically to how many cells in a row have text in them. In other words, when a cell is left blank, the entire row should not appear in the table.

I've tried the following code:

Sub test()
Dim i As Integer
Dim nrrows As Integer

[Code]....

When I run this code, it hides all rows, even the ones that aren't blank. why this might happen and how I can make it work?

View 9 Replies View Related

Copy Rows Where Column Cell Is Not Blank

Dec 13, 2007

What I have are invoices that span an entire month that I need to convert into a format for the billing department. The columns I have right now are: "Invoice Number"Cost CenterAccountFundType of Service" Date of Completion"Unit PriceQty Total Price

I need to generate a file with the headings as: Cost CenterFund"Date of Completion"Account Total Price. Since Total Price only appears on the rows that have the final information I need, I want to have a script that grabs every line in which the Total Price column has data, generate a file of the summary lines, then throw that through another macro to reformat it into the final format, or just do it in one step. In summary I need to grab rows where Column I is not empty, whats the best way to do this?

View 3 Replies View Related

Add Character To 1st Blank Cell In Multiple Rows

Jun 28, 2008

I am looking for VBA code that will add the character ")" to the first blank cell in each row. The amount of columns in each row changes and the amount of rows change. I attached a sample spreadsheet.

View 2 Replies View Related

Sum Three Adjacent Cell Values In Specific Row And Then Sum Up All Rows

Mar 12, 2013

I'm looking for a formula to sum three adjacent cell values in a specific row and then sum up all of the rows.

A B C
1 0 2
3 1 2
4 4 0

For example, the value for the above would return 17 = [(1+0+2)+(3+1+2)+(4+4+0)]

View 5 Replies View Related