none
Window ScrollintoView Methode funktioniert nicht !? RRS feed

  • Frage

  • ich erstelle eine Excel .net Anwendung.

    Ich versuche alle auf einem Excel Blatt vorhandenen Shapes in einem eigenen Fenster so darzustellen. daß  die Fenster so dimensioniert werden, daß sie die Shape genau zeigen.

    Dazu habe ich die window.scrollintoview Methode verwendet, die die Top, Left, width, Height Werte des jeweiligen Shapes mitbekommt

    Es funktioniert aber nicht. Was mache ich falsch? 

    hier der code, den ich verwendet habe: 

    For Each shp In ActiveSheet.Shapes
        shpLeft = shp.left
        shpTop = shp.top
        shpWidth = shp.width
        shpHeight = shp.height
        Set newWindow = ActiveWorkbook.Windows("Start").newWindow
        
        With newWindow
            .Caption = "Shape " & i
            .WindowState = xlNormal
            .top = winTop
            .left = winLeft
            .width = 1.1 * shpWidth
            .height = 1.1 * shpHeight
            .ScrollIntoView left:=shpLeft, top:=shpTop, width:=shpWidth, height:=shpHeight
            
     
        End With
       
        winTop = winTop + topDiff
        winLeft = winLeft + leftDiff
        
    Next shp


    Donnerstag, 15. November 2012 12:48

Alle Antworten