Sorting of data

M

mirrorwatch

New Member
Joined
Sep 28, 2011
Messages
31
Firstly, P represents positive and N represents negative.

I want

<table border="1" cellpadding="0" cellspacing="0"><tbody><tr style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center"><td>
</td> <td>A</td> <td>B</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">1</td> <td style="BACKGROUND-COLOR: #99cc00">Items</td> <td style="BACKGROUND-COLOR: #99cc00">Effect</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">2</td> <td>Apple</td> <td style="TEXT-ALIGN: right">P</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">3</td> <td>Orange</td> <td style="TEXT-ALIGN: right">N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">4</td> <td>Mouse</td> <td style="TEXT-ALIGN: right">P</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">5</td> <td>Book</td> <td style="TEXT-ALIGN: right">N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">6</td> <td>Apple</td> <td style="TEXT-ALIGN: right">N
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">7</td> <td>Watch</td> <td style="TEXT-ALIGN: right">P</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">8</td> <td>Paper</td> <td style="TEXT-ALIGN: right">N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">9</td> <td>Paper</td> <td style="TEXT-ALIGN: right">P

</td></tr></tbody></table>
to show

<table border="1" cellpadding="0" cellspacing="0"><tbody><tr style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center"><td>
</td> <td>A</td> <td>B</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">1</td> <td style="BACKGROUND-COLOR: #99cc00">Items</td> <td style="BACKGROUND-COLOR: #99cc00">Effect</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">2</td> <td>Apple</td> <td style="TEXT-ALIGN: right">
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">3</td> <td>Orange</td> <td style="TEXT-ALIGN: right">
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">4</td> <td>Mouse</td> <td style="TEXT-ALIGN: right">1</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">5</td> <td>Book</td> <td style="TEXT-ALIGN: right">
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">6</td> <td>Watch</td> <td style="TEXT-ALIGN: right">1
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">7</td> <td>Paper</td> <td style="TEXT-ALIGN: right">
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">
</td> <td>
</td> <td style="TEXT-ALIGN: right">
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">
</td> <td>
</td> <td style="TEXT-ALIGN: right">
</td></tr></tbody></table>

As apple/paper has Negative and Positive meaning nil at the end.
And as there are many items so I want a macro to generate the 2nd type of table easier and quicker.
 

Excel Facts

Create a Pivot Table on a Map
If your data has zip codes, postal codes, or city names, select the data and use Insert, 3D Map. (Found to right of chart icons).
Sort by date Sort by votes
Try this :-
Results start "C2"
Code: 
[COLOR="Navy"]Sub[/COLOR] MG05Oct07
[COLOR="Navy"]Dim[/COLOR] Rng     [COLOR="Navy"]As[/COLOR] Range
[COLOR="Navy"]Dim[/COLOR] Dn      [COLOR="Navy"]As[/COLOR] Range
[COLOR="Navy"]Dim[/COLOR] oRes    [COLOR="Navy"]As[/COLOR] [COLOR="Navy"]String[/COLOR]
[COLOR="Navy"]Set[/COLOR] Rng = Range(Range("A2"), Range("A" & Rows.Count).End(xlUp))
[COLOR="Navy"]With[/COLOR] CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
[COLOR="Navy"]For[/COLOR] [COLOR="Navy"]Each[/COLOR] Dn [COLOR="Navy"]In[/COLOR] Rng
    [COLOR="Navy"]If[/COLOR] Not .Exists(Dn.Value) [COLOR="Navy"]Then[/COLOR]
        oRes = IIf(Dn(, 2) = "P", 1, "")
        .Add Dn.Value, oRes
    [COLOR="Navy"]Else[/COLOR]
        [COLOR="Navy"]If[/COLOR] .Item(Dn.Value) = "1" And Dn(, 2) = "N" [COLOR="Navy"]Then[/COLOR] .Item(Dn.Value) = ""
        [COLOR="Navy"]If[/COLOR] .Item(Dn.Value) = "" And Dn(, 2) = "P" [COLOR="Navy"]Then[/COLOR] .Item(Dn.Value) = ""
    [COLOR="Navy"]End[/COLOR] If
[COLOR="Navy"]Next[/COLOR]
Range("C2").Resize(.Count, 2) = Application.Transpose(Array(.Keys, .Items))
[COLOR="Navy"]End[/COLOR] [COLOR="Navy"]Sub[/COLOR]
Regards Mick
 
Upvote 0
You could use a formula - adapt this to your range of cells (also change "apple" to the cell reference in your second table and autofill down)
This will leave a blank cell if the overall effect is zero or put the numeric value in if it is > 0
=IF(COUNTIFS($B$7:$B$15,"apple",$C$7:$C$15,"P")-COUNTIFS($B$7:$B$15,"apple",$C$7:$C$15,"N")=0,"",COUNTIFS($B$7:$B$15,"apple",$C$7:$C$15,"P")-COUNTIFS($B$7:$B$15,"apple",$C$7:$C$15,"N"))
 
Upvote 0
Sorry, but that code does not seam to work for me, firstly there is no end with, and .keys seems invalid.

And also what if I want the 2nd table into a new worksheet instead of same activesheet
 
Upvote 0
Sorry about that, copying Error !!
Try this For Results on sheet2 starting "A2"
Code: 
[COLOR=navy]Sub[/COLOR] MG05Oct27
[COLOR=navy]Dim[/COLOR] Rng     [COLOR=navy]As[/COLOR] Range
[COLOR=navy]Dim[/COLOR] Dn      [COLOR=navy]As[/COLOR] Range
[COLOR=navy]Dim[/COLOR] oRes    [COLOR=navy]As[/COLOR] [COLOR=navy]String[/COLOR]
[COLOR=navy]Set[/COLOR] Rng = Range(Range("A2"), Range("A" & Rows.Count).End(xlUp))
[COLOR=navy]With[/COLOR] CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
[COLOR=navy]For[/COLOR] [COLOR=navy]Each[/COLOR] Dn [COLOR=navy]In[/COLOR] Rng
    [COLOR=navy]If[/COLOR] Not .Exists(Dn.Value) [COLOR=navy]Then[/COLOR]
        oRes = IIf(Dn(, 2) = "P", 1, "")
        .Add Dn.Value, oRes
    [COLOR=navy]Else[/COLOR]
        [COLOR=navy]If[/COLOR] .Item(Dn.Value) = "1" And Dn(, 2) = "N" [COLOR=navy]Then[/COLOR] .Item(Dn.Value) = ""
        [COLOR=navy]If[/COLOR] .Item(Dn.Value) = "" And Dn(, 2) = "P" [COLOR=navy]Then[/COLOR] .Item(Dn.Value) = ""
    [COLOR=navy]End[/COLOR] If
[COLOR=navy]Next[/COLOR]
Sheets("Sheet2").Range("A2").Resize(.Count, 2) = Application.Transpose(Array(.Keys, .Items))
[COLOR=navy]End[/COLOR] [COLOR=navy]With[/COLOR]
[COLOR=navy]End[/COLOR] [COLOR=navy]Sub[/COLOR]
Regards Mick
 
Upvote 0
Thanks just one last part,

what if there are many columns and the items column is B and the effect column is D. And column C is for name so I want the outcome like this.


<table style="PADDING-RIGHT: 2pt; PADDING-LEFT: 2pt; FONT-SIZE: 11pt; FONT-FAMILY: Calibri,Arial; BACKGROUND-COLOR: #ffffff" border="1" cellpadding="0" cellspacing="0"> <colgroup> <col style="FONT-WEIGHT: bold; WIDTH: 30px"> <col style="WIDTH: 105px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"></colgroup> <tbody> <tr style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center"> <td> </td> <td>A</td> <td>B</td> <td>C</td> <td>D</td> <td>E</td> <td>F</td> <td>G</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">1</td> <td style="FONT-WEIGHT: bold; FONT-SIZE: 10pt; FONT-FAMILY: Arial">Owner/Items</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Apple</td> <td>Orange</td> <td>Mouse </td> <td>Book</td> <td>Watch</td> <td>Paper</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">2</td> <td>Sam</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial"> </td> <td> </td> <td> </td> <td> </td> <td> </td> <td> </td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">3</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Tom</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial"> </td> <td> </td> <td style="TEXT-ALIGN: right">1</td> <td> </td> <td> </td> <td> </td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">4</td> <td>Jerry</td> <td> </td> <td> </td> <td> </td> <td> </td> <td style="TEXT-ALIGN: right">1</td> <td> </td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">5</td> <td>Tommy</td> <td> </td> <td> </td> <td> </td> <td> </td> <td> </td> <td> </td></tr></tbody></table>
 
Upvote 0
I can't quite relate your last requirement to your data example , could you show examples of your complete data including the names, before and after the code has run. !!!
 
Upvote 0
The modification done is now the table is like this

<table style="PADDING-RIGHT: 2pt; PADDING-LEFT: 2pt; FONT-SIZE: 11pt; FONT-FAMILY: Calibri,Arial; BACKGROUND-COLOR: #ffffff" border="1" cellpadding="0" cellspacing="0"> <colgroup> <col style="FONT-WEIGHT: bold; WIDTH: 30px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"> <col style="WIDTH: 64px"></colgroup> <tbody> <tr style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center"> <td> </td> <td>A</td> <td>B</td> <td>C</td> <td>D</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">1</td> <td>Number</td> <td>Items</td> <td>Owner</td> <td>Effect</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">2</td> <td style="TEXT-ALIGN: right">1</td> <td>Apple</td> <td>Sam</td> <td>P</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">3</td> <td style="TEXT-ALIGN: right">2</td> <td>Orange</td> <td>Sam</td> <td>N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">4</td> <td style="TEXT-ALIGN: right">3</td> <td>Mouse</td> <td>Tom</td> <td>P</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">5</td> <td style="TEXT-ALIGN: right">4</td> <td>Book</td> <td>Tommy</td> <td>N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">6</td> <td style="TEXT-ALIGN: right">5</td> <td>Apple</td> <td>Sam</td> <td>N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">7</td> <td style="TEXT-ALIGN: right">6</td> <td>Watch</td> <td>Jerry</td> <td>P</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">8</td> <td style="TEXT-ALIGN: right">7</td> <td>Paper</td> <td>Tom</td> <td>N</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">9</td> <td style="TEXT-ALIGN: right">8</td> <td>Paper</td> <td>Jerry</td> <td>P</td></tr></tbody></table>
Owner represents the person who owns the item.And I want to get this then
<table border="1" cellpadding="0" cellspacing="0"><tbody><tr style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center"></tr><tr style="FONT-WEIGHT: bold; FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center"><td>
</td> <td>A</td> <td>B</td> <td>C</td> <td>D</td> <td>E</td> <td>F</td> <td>G</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">1</td> <td style="FONT-WEIGHT: bold; FONT-SIZE: 10pt; FONT-FAMILY: Arial">Owner/Items</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Apple</td> <td>Orange</td> <td>Mouse </td> <td>Book</td> <td>Watch</td> <td>Paper</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">2</td> <td>Sam</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">
</td> <td>
</td> <td>
</td> <td>
</td> <td>
</td> <td>
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">3</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">Tom</td> <td style="FONT-SIZE: 10pt; FONT-FAMILY: Arial">
</td> <td>
</td> <td style="TEXT-ALIGN: right">1</td> <td>
</td> <td>
</td> <td>
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">4</td> <td>Jerry</td> <td>
</td> <td>
</td> <td>
</td> <td>
</td> <td style="TEXT-ALIGN: right">1</td> <td>
</td></tr> <tr style="HEIGHT: 18px"> <td style="FONT-SIZE: 8pt; BACKGROUND-COLOR: #cacaca; TEXT-ALIGN: center">5</td> <td>Tommy</td> <td>
</td> <td>
</td> <td>
</td> <td>
</td> <td>
</td> </tr></tbody></table>
 
Upvote 0
Try this:-
Code: 
[COLOR=navy]Sub[/COLOR] MG05Oct19
[COLOR=navy]Dim[/COLOR] Rng     [COLOR=navy]As[/COLOR] Range
[COLOR=navy]Dim[/COLOR] Dn      [COLOR=navy]As[/COLOR] Range
[COLOR=navy]Dim[/COLOR] oRes    [COLOR=navy]As[/COLOR] [COLOR=navy]String[/COLOR]
[COLOR=navy]Dim[/COLOR] q       [COLOR=navy]As[/COLOR] Variant
[COLOR=navy]Dim[/COLOR] c       [COLOR=navy]As[/COLOR] [COLOR=navy]Long[/COLOR]
[COLOR=navy]Dim[/COLOR] Own     [COLOR=navy]As[/COLOR] Variant
[COLOR=navy]Dim[/COLOR] n       [COLOR=navy]As[/COLOR] [COLOR=navy]Long[/COLOR]
[COLOR=navy]Dim[/COLOR] oNum    [COLOR=navy]As[/COLOR] [COLOR=navy]Long[/COLOR]
[COLOR=navy]Dim[/COLOR] ac      [COLOR=navy]As[/COLOR] [COLOR=navy]Integer[/COLOR]
[COLOR=navy]Dim[/COLOR] k
[COLOR=navy]Set[/COLOR] Rng = Range(Range("B2"), Range("B" & Rows.Count).End(xlUp))
[COLOR=navy]With[/COLOR] CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
[COLOR=navy]For[/COLOR] [COLOR=navy]Each[/COLOR] Dn [COLOR=navy]In[/COLOR] Rng
    [COLOR=navy]If[/COLOR] Not .Exists(Dn.Value) [COLOR=navy]Then[/COLOR]
        oRes = IIf(Dn(, 3) = "P", 1, "")
        .Add Dn.Value, Array(Dn, Dn(, 2), oRes)
    [COLOR=navy]Else[/COLOR]
       q = .Item(Dn.Value)
        [COLOR=navy]If[/COLOR] q(2) = "1" And Dn(, 3) = "N" [COLOR=navy]Then[/COLOR] q(2) = ""
        [COLOR=navy]If[/COLOR] q(2) = "" And Dn(, 3) = "P" [COLOR=navy]Then[/COLOR] q(2) = ""
       .Item(Dn.Value) = q
    [COLOR=navy]End[/COLOR] If
[COLOR=navy]Next[/COLOR]
ReDim ray(1 To Rng.Count, 1 To .Count + 1)
c = 1: ac = 1
[COLOR=navy]For[/COLOR] [COLOR=navy]Each[/COLOR] Own [COLOR=navy]In[/COLOR] Owner(Rng.Offset(, 1))
    c = c + 1
    ray(c, 1) = Own
[COLOR=navy]Next[/COLOR] Own
[COLOR=navy]For[/COLOR] [COLOR=navy]Each[/COLOR] k [COLOR=navy]In[/COLOR] .Keys
    ac = ac + 1
    ray(1, ac) = .Item(k)(0)
        [COLOR=navy]For[/COLOR] oNum = 2 To c
            [COLOR=navy]If[/COLOR] ray(oNum, 1) = .Item(k)(1) [COLOR=navy]Then[/COLOR]
                ray(oNum, ac) = .Item(k)(2)
            [COLOR=navy]End[/COLOR] If
        [COLOR=navy]Next[/COLOR] oNum
[COLOR=navy]Next[/COLOR] k
Sheets("Sheet2").Range("A1").Resize(c, ac) = ray
[COLOR=navy]End[/COLOR] With
MsgBox "Run"
[COLOR=navy]End[/COLOR] [COLOR=navy]Sub[/COLOR]
Function Owner(nRng [COLOR=navy]As[/COLOR] Range) [COLOR=navy]As[/COLOR] Variant
[COLOR=navy]Dim[/COLOR] Dn [COLOR=navy]As[/COLOR] Range
[COLOR=navy]With[/COLOR] CreateObject("scripting.dictionary")
  .CompareMode = vbTextCompare
[COLOR=navy]For[/COLOR] [COLOR=navy]Each[/COLOR] Dn [COLOR=navy]In[/COLOR] nRng
    .Item(Dn.Value) = Dn
[COLOR=navy]Next[/COLOR] Dn
Owner = .Keys
[COLOR=navy]End[/COLOR] With
[COLOR=navy]End[/COLOR] Function
Regards Mick
 
Upvote 0
Thanks for the code, but I have shifted the Items section from B to E so how to adjust for the change?
 
Last edited:
Upvote 0
You must log in or register to reply here.

Similar threads

D
  • Solved
VBA Function to Paste Table into Outlook Email Resulting in HTML language in Email
Replies
8
Views
622
smozgur
smozgur
E
  • Question Question
VBA code clean up
Replies
9
Views
582
mumps
mumps
smide
  • Solved
Formula for percentile if data are in multiple columns
Replies
2
Views
123
hagia_sofia
hagia_sofia
L
  • Question Question
Searchable data validation list problem
Replies
0
Views
52
Lschuman
L
D
  • Question Question
Looking for a way to allocate shifts between teams, maybe a LET formula
Replies
0
Views
89
Dazzybeeguy
D

Forum statistics

Threads
1,224,585
Messages
6,179,703
Members
452,938
Latest member
babeneker

Share this page

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top