How can i mark empty cells who is not contains any data

[Morty07]

Hi, I have an excel sheet where i want to put a mark on. After that i will extract those data on the line to a new sheet. It is difficult to explain but take å look at the file.

The number is å productnumber, second is description, third is the product price, the fourth is the number how many they bought, the fifth is total price.
Between the different product description is an total line. The product column are yellow. Do anyone have any idea or process to get it out like this:

100007 - Hvit linjemaling - total product price - total numbers - total price

I do think i have to do this in several processes, but I'am looking for an easy way to those processes.


[TABLE="class: grid, width: 500"]
<tbody>[TR]
[TD][TABLE="width: 52"]
<colgroup><col></colgroup><tbody>[TR]
[TD]100007[/TD]
[/TR]
[TR]
[TD]100007[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]100321[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]100572[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]100718[/TD]
[/TR]
[TR]
[TD]100718[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 194"]
<colgroup><col></colgroup><tbody>[TR]
[TD]Hvit linjemaling - Oppmerking gressbane[/TD]
[/TR]
[TR]
[TD]Hvit linjemaling - Oppmerking gressbane[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]Hjørnestolpe, Fleksibel[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]Hjørneflagg - Rødt[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]Wire i stål, 6mm[/TD]
[/TR]
[TR]
[TD]Wire i stål, 6mm[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 90"]
<colgroup><col></colgroup><tbody>[TR]
[TD]Stk[/TD]
[/TR]
[TR]
[TD]Stk[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]Stk[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]Stk[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
[TR]
[TD]Meter[/TD]
[/TR]
[TR]
[TD]Meter[/TD]
[/TR]
[TR]
[TD] [/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 90"]
<colgroup><col></colgroup><tbody>[TR]
[TD]453,14[/TD]
[/TR]
[TR]
[TD]795,00[/TD]
[/TR]
[TR]
[TD]585,64[/TD]
[/TR]
[TR]
[TD]100,92[/TD]
[/TR]
[TR]
[TD]12,61[/TD]
[/TR]
[TR]
[TD]65,52[/TD]
[/TR]
[TR]
[TD]8,19[/TD]
[/TR]
[TR]
[TD]8,93[/TD]
[/TR]
[TR]
[TD]8,93[/TD]
[/TR]
[TR]
[TD]9,74[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 90"]
<colgroup><col></colgroup><tbody>[TR]
[TD]3,00[/TD]
[/TR]
[TR]
[TD]3,00[/TD]
[/TR]
[TR]
[TD]6,00[/TD]
[/TR]
[TR]
[TD]8,00[/TD]
[/TR]
[TR]
[TD]8,00[/TD]
[/TR]
[TR]
[TD]8,00[/TD]
[/TR]
[TR]
[TD]8,00[/TD]
[/TR]
[TR]
[TD]6,00[/TD]
[/TR]
[TR]
[TD]5,00[/TD]
[/TR]
[TR]
[TD]11,00[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][TABLE="width: 90"]
<colgroup><col></colgroup><tbody>[TR]
[TD]1 359,42[/TD]
[/TR]
[TR]
[TD]2 385,00[/TD]
[/TR]
[TR]
[TD]3 744,42[/TD]
[/TR]
[TR]
[TD]807,33[/TD]
[/TR]
[TR]
[TD]807,33[/TD]
[/TR]
[TR]
[TD]524,14[/TD]
[/TR]
[TR]
[TD]524,14[/TD]
[/TR]
[TR]
[TD]53,56[/TD]
[/TR]
[TR]
[TD]44,64[/TD]
[/TR]
[TR]
[TD]98,20[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[TD][/TD]
[TD][/TD]
[/TR]
[TR]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[TD][/TD]
[/TR]
</tbody>[/TABLE]

I'am living in a hope that someone can help me with this.

Morty

 

[Special-K99]

Re: How can i mark empty celles who is not contains any data

Not saying I'll answer this but it's not clear from your diagram what data is in which cell.
At the moment it looks like your diagram consists of 8 columns by 2 rows and the Product Numbers are all in ONE cell (A1 presumably).
If this is not the case you need to edit your diagram to clarify what data is on what row and in which cell.

 

[Morty07]

Re: How can i mark empty celles who is not contains any data

Ok thank you I will do that.
A = Productnumber B= productdescription C= Size etc D= Product price E=how many customer have ordered F=Total price

 

[Fluff]

Re: How can i mark empty celles who is not contains any data

How about

Sub Morty07()
   Dim Rng As Range
   Set Rng = Range("A:A").SpecialCells(xlBlanks)
   With Range("A2", Range("D" & Rows.Count).End(xlUp).Offset(, -1))
      .SpecialCells(xlBlanks).FormulaR1C1 = "=r[-1]c"
      .Value = .Value
   End With
   Rng.EntireRow.Copy Sheets("Tmp").Range("A2")
End Sub

 

[Morty07]

Re: How can i mark empty celles who is not contains any data

Ehh Fluff,

I do not have a clue what this means, and where do i activate this. Morty

How about

Sub Morty07()
   Dim Rng As Range
   Set Rng = Range("A:A").SpecialCells(xlBlanks)
   With Range("A2", Range("D" & Rows.Count).End(xlUp).Offset(, -1))
      .SpecialCells(xlBlanks).FormulaR1C1 = "=r[-1]c"
      .Value = .Value
   End With
   Rng.EntireRow.Copy Sheets("Tmp").Range("A2")
End Sub

 

[Fluff]

Re: How can i mark empty celles who is not contains any data

It's a macro that needs to go in a regular module, have a look here to see how https://www.contextures.com/xlvba01.html

 

[Morty07]

Re: How can i mark empty celles who is not contains any data

Dear Fluff, sorry about delyed answer. You are my hero. Thank you so much, it helped me. Now I'am gonna learn macro when og got time. Can i give you anu cudos or something.

Morty

 

[Fluff]

Re: How can i mark empty celles who is not contains any data

You're welcome & thanks for the feedback.

Letting me know that it works & a word of thanks is all I need