<html>
    <head>
      <base href="https://bugs.documentfoundation.org/">
    </head>
    <body><table border="1" cellspacing="0" cellpadding="8">
        <tr>
          <th>Bug ID</th>
          <td><a class="bz_bug_link 
          bz_status_UNCONFIRMED "
   title="UNCONFIRMED - Add zoom/unzoom mouse scroll on "calc sheet embedded object" in writer"
   href="https://bugs.documentfoundation.org/show_bug.cgi?id=114372">114372</a>
          </td>
        </tr>

        <tr>
          <th>Summary</th>
          <td>Add zoom/unzoom mouse scroll on "calc sheet embedded object" in writer
          </td>
        </tr>

        <tr>
          <th>Product</th>
          <td>LibreOffice
          </td>
        </tr>

        <tr>
          <th>Version</th>
          <td>5.3.2.2 release
          </td>
        </tr>

        <tr>
          <th>Hardware</th>
          <td>All
          </td>
        </tr>

        <tr>
          <th>OS</th>
          <td>All
          </td>
        </tr>

        <tr>
          <th>Status</th>
          <td>UNCONFIRMED
          </td>
        </tr>

        <tr>
          <th>Severity</th>
          <td>enhancement
          </td>
        </tr>

        <tr>
          <th>Priority</th>
          <td>medium
          </td>
        </tr>

        <tr>
          <th>Component</th>
          <td>Writer
          </td>
        </tr>

        <tr>
          <th>Assignee</th>
          <td>libreoffice-bugs@lists.freedesktop.org
          </td>
        </tr>

        <tr>
          <th>Reporter</th>
          <td>marcduhil@hotmail.com
          </td>
        </tr></table>
      <p>
        <div>
        <pre>Description:
It would be very nice if it was possible to zoom and unzoom on an calc sheet
embedded object in writer. I did it with a macro/button but it is not very
friendly user.


'XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Sub ZoomPlusMoins

monDoc = ThisComponent
monOLE = monDoc.EmbeddedObjects.getByName("Objet6")
GLOBALHauteur2 = monOLE.Height

oFormu = monDoc.DrawPage.Forms.getByName("Formulaire")
oCompteur = oFormu.getByName("Compteur 1")

sousObjet = monOLE.EmbeddedObject.Component.CurrentController
        if  IsNull(sousObjet) then
                warning = ("Il faut double cliquer dans le cadre avant de
zoomer")
                r = msgbox (warning, 16,"Information")
        else
                if IsNull(GLOBALoSpinZoom) then
                        GLOBALoSpinZoom = 0
                else
                        oSpin = oCompteur.SpinValue
                        GLOBALmonZoom = sousObjet.ZoomValue
                        if oSpin > GLOBALoSpinZoom then 
                                GLOBALmonZoom = GLOBALmonZoom + 3
                        else
                                GLOBALmonZoom = GLOBALmonZoom - 3

                        end if
                        sousObjet.ZoomValue = GLOBALmonZoom
                        GLOBALoSpinZoom = oSpin

                end if


        end if
End Sub

Steps to Reproduce:
1.Create a sheet in calc
2.Copy and paste it in writer
3.From writer, double clic on the embedded objet, then Ctrl+Mouse Scroll:
nothing happens

Actual Results:  
Not possible to zoom / unzoom with mouse scroll

Expected Results:
Possible to zoom with mouse scroll in a "sheet calc embedded object" from
writer


Reproducible: Always


User Profile Reset: No



Additional Info:


User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:57.0) Gecko/20100101
Firefox/57.0</pre>
        </div>
      </p>


      <hr>
      <span>You are receiving this mail because:</span>

      <ul>
          <li>You are the assignee for the bug.</li>
      </ul>
    </body>
</html>