Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
inconsistent size progress bar
hi all,
i got a macro that does chart animation and a progress bar. i set the progressbar to be visible during animation running, updating its status and make it invisible when the animation ends. however everytime i re-open the document, i have to at least go to the design mode and modify the progress bar's size otherwise the progress bar will appear with the different size that i set (most of the times it looks square). sometimes the positioning move to the top left corner too. i've tried setting the size and position manually before i made the progressbar visible, but it didn't work. have you guys ever have simmilar problem? (i'm using excel2002, the progress bar is on version 6.0) this is pretty anoying since i want to locked the spreadsheet to prevent user to tamper with it. here's the code: Public Sub movePoints(ByVal sourceName As String, ByVal destinationName As String, ByVal targetName As String) 'statusbar logic With Sheets("Form") .pgsStatus.Value = .pgsStatus.min .pgsStatus.Left = 51.75 .pgsStatus.Top = 480 .pgsStatus.Width = 238.5 .pgsStatus.Height = 8.25 .pgsStatus.Visible = True .lblProgress.Visible = True End With For i = 1 To division 'animation logic goes here updateProgress Sheets("Form").pgsStatus, 1, division, i Wait 1 Next i Sheets("Form").pgsStatus.Visible = False Sheets("Form").lblProgress.Visible = False end sub Private Sub updateProgress(ByRef pgs As ProgressBar, ByVal min As Integer, ByVal max As Integer, ByVal val As Integer) pgs.min = min pgs.max = max pgs.Value = val End Sub kind regards freddie |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Date inconsistent help please :) | Excel Worksheet Functions | |||
VLOOKUP inconsistent ... help. | Excel Discussion (Misc queries) | |||
inconsistent autofit | Excel Discussion (Misc queries) | |||
Calculation inconsistent | Excel Discussion (Misc queries) | |||
DDEInitiate inconsistent... | Excel Programming |