title: Count specific shapes on Excel by VBA
body: <p>I developed Excel VBA code to appear the shapes and count them by <strong>categories</strong> depending on data entry.</p>
  <p>For example:<br />
  <a href="https://i.stack.imgur.com/I3MPn.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/I3MPn.png" alt="enter image description here" /></a></p>
  <p>Until now the shapes are appeared based on data entry.<br />
  I can't count the shapes by <strong>categories</strong>.</p>
  <p>An example of what I need:<br />
  <a href="https://i.stack.imgur.com/Ef9PJ.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/Ef9PJ.png" alt="enter image description here" /></a></p>
  <p>My try:</p>
  <pre><code>MsgBox ActiveSheet.Shapes.Count
  </code></pre>
  <p>This counts all the shapes.<br />
  Instead I need to count the specific shapes.</p>