Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  Advanced Search
  HOME    TRACKER    Excel


How To Write An API To Control The Zoom Of A Worksheet

I want to know how to make a spreadsheet automatically control the zoom of a worksheet depending on the size of the screen it is opened on. For example, if it is opened on a screen of a certain size then it will set the zoom to 80% so the worksheet will show only a certain section. I want my worksheets to look the same on even the larger screens and not show the unused rows and columns around the section I am wanting to highlight.

In a previous thread I was told I might need to write an API to help me with achieving this. First of all, what is an API? Secondly, how do I go about writing one?

View Complete Thread with Replies

Sponsored Links:

Related Forum Messages:
Zoom In By Using The ActiveWindow.Zoom Control
I know you can predefine the level of zoom you want by using the ActiveWindow.Zoom control. I'm trying to find some code to Zoom in by a particular percentage. For example +10% zoom, so if you are currently on 90%, excel zooms to 100%, click again and then get a zoom of 110%.

View Replies!   View Related
Select Next Control / Cell On Worksheet After Enter In Control
Within the ComboBox properties, is there anyway to control after "enter" his hit, you move to the right instead of down (similar to the edit under Tools/Options)?

View Replies!   View Related
Write This Worksheet Formula In VBA
I want to write the following worksheet function in VBA. In cell B1 : =IF(OR(A1={1,2,3,4,5,6,7,8,9,0}),"Yes","No").

View Replies!   View Related
Determine And Write To The Last Row Of A Worksheet
I managed to write my script with pretty much the info I could find on the forums (yes!) but I need to write my data to the last row. Columns A - D of the last row will be populated with the content of my variables. This little snipped gives me the first empty row:

View Replies!   View Related
Write Userform Data To Worksheet
I have two userforms. The 1st is called “add a facility” and the second is called “Edit Facility”.
The first userform works pretty well. It places all the data in the right columns in the first empty row at the end of the table. Then the “sort” procedure places the “new” facility data in the right category. Everything is good there. Here's the code.

Private Sub CmndInput_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("Facilities")

' find first empty row in database
iRow = ws. Cells(Rows.Count, 2).End(xlUp).Offset(1, 0).Row

'check for a Facility
If Trim(Me.TextFacility.Value) = "" Then
MsgBox "Please enter a Facility"
Exit Sub
End If

'copy the data to the database
ws.Cells(iRow, 1).Value = Me.ListBox1.Value
ws.Cells(iRow, 5).Value = Me.TextFacility.Value
ws.Cells(iRow, 4).Value = Me.ListBox2.Value
ws.Cells(iRow, 6).Value = Me.TextType.Value
ws.Cells(iRow, 7).Value = Me.ListBox3.Value
ws.Cells(iRow, 12).Value = Me.TextConstneed.Value
ws.Cells(iRow, 16).Value = Me.TextPREAPP.Value
ws.Cells(iRow, 17).Value = Me.TextPreapsub.Value
ws.Cells(iRow, 3).Value = Me.TextDescription.Value
ws.Cells(iRow, 8).Value = Me.ListBox4.Value
ws.Cells(iRow, 9).Value = Me.ListBox5.Value
ws.Cells(iRow, 2).Value = Me.txtRefnum.Value
ws.Cells(iRow, 21).Value = Me.txtappdate.Value
ws.Cells(iRow, 24).Value = Me.ListBox6.Value
ws.Cells(iRow, 20).Value = Me.txtsubdate.Value
ws.Cells(iRow, 10).Value = Me.ListBox7.Value

' SORT Macro...

View Replies!   View Related
Macro To Write Protect A Worksheet With A Password
I'm trying to protect a worksheet with a password using macro.

View Replies!   View Related
Macro To Write VBA Code In A Worksheet
how to write a macro, which in turn write some VBA code in a worksheet?

View Replies!   View Related
Write Visible Worksheet Rows/Columns To Text File
I am trying to write the contents of a worksheet to a notepad file. Also, the worksheet has some hidden columns.

View Replies!   View Related
To Write A Macro That Will Insert A Formula Directly Into The Cells In Column M Of My Worksheet
I am trying to write a macro that will insert a formula directly into the cells in column M of my worksheet.

The worksheet has about 3400 rows. When I run the macro it does not adjust the cell reference in the formula so I am getting the same value in all 3400 rows.

I am using the following ....

View Replies!   View Related
API To Get Username
I have Timesheet workbooks with 3 levels of access (user, viewer & me as developer).

I want use the GetuserName API function (with If/Then) to auto open the wkbk if I am loged in under my network login so psuecode looks bit like this

If network user is me then open wkbk
else ask for username & password

I have googled & searched the forum & the closest I have is this

Public Declare Function GetUserName Lib "advapi32.dll" _
Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Function ReturnUserName() As String
' returns the NT Domain User Name
Dim rString As String * 255, sLen As Long, tString As String
tString = ""
On Error Resume Next...............

View Replies!   View Related
Get Short Name API
I've been working with the getshortname() API, but have found that it has trouble handling strings that are already in short name format. I used a trim function to work around this. Now I find another problem; the API doesn't change paths with spaces in them. for example:

H:WCMGMTWC ProdBackup2

should return


Here is the
Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal longPath As String, ByVal shortPath As String, ByVal shortBufferSize As Long) As Long

Private Sub Test()
Dim longPathName As String
longPathName = "H:WCMGMTWC ProdBackup2"
'Get the size of the string to pass to the string buffer.
Dim longPathLength As Long
longPathLength = Len(longPathName)
Dim shortPathName As String
shortPathName = Space$(longPathLength)..............................

View Replies!   View Related
Api Instead Sendkeys
this is the code i'm using but sometimes it runs sometimes it runs incorrectly; i've been told that sendkeys is not a good choice and i should use API but i'm just studying VB6 and i do not know what is API; so i need a code to copy and paste in a module this is the code with sendkeys that i need insterad with API

Sub b()
Shell "C:Program FilesEquisThe DownLoaderDlwin", vbMinimizedFocus
SendKeys "%{T}", Wait:=True
SendKeys "{o}", Wait:=True
SendKeys "{A}", Wait:=True
SendKeys "{DOWN}", Wait:=True
SendKeys "{TAB}", Wait:=True
SendKeys "C:Documents and SettingsfrancoDesktop", Wait:=True
SendKeys "{TAB}", Wait:=True
SendKeys "matrice1.txt", Wait:=True...............

View Replies!   View Related
Refedit Control In Worksheet
I would like to use the RefEdit control in a worksheet in order to select a range of cells and pass its address to a different cell without code.

I thought of using the LinkedCell property of the RefEdit as I used it for a ComboBox.

View Replies!   View Related
Return Control Name On Worksheet
what is wrong with the following code where I'm simply trying to return (evaluate) the name of a control toolbar object from a sheet: If ActiveSheet.Shapes(1). OLEObject.Name = "TextBox" Then

View Replies!   View Related
Add TabStrip Control To Worksheet
When I place an ActiveX TabStrip or a MultiPage onto a spreadsheet, and then try to put a ComboBox onto the TabStrip, the ComboBox will fall behind the TabStrip when I run my pointer across the TabStrip. I used the Arange order from the Draw toolbar to place ComboBox on top and the TabStrip behind, but to no avail. (I would love to use a User Form but lack the VBA know how).

View Replies!   View Related
Worksheet Form Control Properties
how to get a list of the properties for form control shapes (not control toolbox shapes) that are placed on a worksheet (not on a userform). Eg., a button, checkbox, combobox, etc.

If it's possible, I'm interested in working with properties like "enabled", "caption", etc. that aren't listed on the "Format Control Properties" dialog.

I understand you can edit properties of a form control shape via VBA code (See example below), however, I can't seem to find anything within the object browser about them.

With ActiveSheet.Shapes("Scroll Bar 2").ControlFormat
.Min = 10
.Max = 150
End With

View Replies!   View Related
Calender Control On Worksheet Shrinks
I have a spreadsheet with many cells that require a date. I have added calendar control 11.0 and running it with the code below. The problem is, that everytime the sheet is opened, the calendar gradually gets smaller and smaller each time the workbook is opened. I have tried resizing through formatting the object, but after opening the workbook several times, it's has shrunk down to unusable again.

Private Sub Calendar1_Click()
ActiveCell.Value = CDbl(Calendar1.Value)
ActiveCell.NumberFormat = "mm/dd/yy"
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Application.Intersect(Range("B161:B184,I161:I184,P161: P184,"), Target) Is Nothing Then
Calendar1.Left = Target.Left
Calendar1.Top = Target.Top + Target.Height
Calendar1.Visible = True
' select Today's date in the Calendar
Calendar1.Value = Date
ElseIf Calendar1.Visible Then Calendar1.Visible = False
End If
End Sub

View Replies!   View Related
Stock Control With Controls On Worksheet
I would like to know if it's possibale to use VB, to auto manage these levels
IE, 1 box asks for the part number 2nd asks you how many 3rd/4th boxes are "+", "-"
When + or - is pressed the part number will automatically add's/subtracts that part level. I had 10x abcde's I enter 2 in "How Many", then press "-" it will then adjust the level from 10 to 8

View Replies!   View Related
API Bloomberg (trying To Use BLP_DATA_CTRLLib.BlpData)
I have a problem with this this code trying to use BLP_DATA_CTRLLib.BlpData.

Sub MultidayHistory()

Dim objDataControl As BLP_DATA_CTRLLib.BlpData
Set objDataControl = New BlpData
Debug.Print "Formulaire Ouvert"

Dim vtResult() As Variant
Dim arrayFields As Variant
Dim vtSecurities() As Variant
Dim CalculDate As Date ' rien à voir avec cdate
Startd = Range("C10").Value
Endd = Range("C11").Value

arrayFields = Array("PX_LAST", "PX_VOLUME", "SPOT_PRICE", "CHG_NET_1D", "CHG_PCT_1D")
arraySecurities = Array("GLE FP Equity", "SX5P Index")......................

View Replies!   View Related
API Call International Settings
I change the international setting by using the API call shown below. The settings change, but is not activated before I exit Excel and go in again.

View Replies!   View Related
Api Call For Add-in Folder
Is there and API call I can do to determine a user's default add-in folder for Excel add-in ?

View Replies!   View Related
Hook Into Google MAPS API
I have a userform which uses the WebBrowser control. The user enters a city and contry to a text box, which then calls google maps to display that area. I have a combo box on this form which list cities as well as a number. how I can link the city list on the google map to the city I have listed in my combo box and have the number associated to that combo box city appear on the google map?

View Replies!   View Related
Filter Worksheet Data With UserForm Control
I have a database in Sheet1, and need to make a drop-down list for each column title, so that it would filter out the necessary letters or words. E.g. I type "au" and see the words starting "au" in one single list (like aura, aubergine, etc..)

View Replies!   View Related
Print Worksheet With Checked CheckBox Control
I am creating a main worksheet (Legend) in which information will be entered and then populate to other areas (worksheets) within the workbook. I would like to create a print macro - that will run and print all the worksheets that we have selected on the "legend" page. These worksheets would have been selected by ticking a check box.

My question is how to associate a check box to a worksheet? For example - the second worksheet is named " Schedule A" 3rd "Schedule B" and so on.

- The check boxes will be name schedule A, Schedule B and so on.
- I would like to associate (link) the checkbox Schedule A with the Worksheet of the same name. Then when this checkbox is selected, and the print macro runs it will print the worksheets that are selected.

View Replies!   View Related
API Call To Get List Of ODBC DSNs
Does anyone have an API that will allow me to get a list of ODBC data sources defined in the Windows ODBC Control Panel?

View Replies!   View Related
Calling Macro: API Postmessage Or Sendmessage
Using a different script application, I would like to run my VBA macros while working in Excel. I was wondering if I could achieve that using PostMessage or SendMessage calls. Part of the problem is that Excel only seems to allow either Ctrl + letter or Ctrl + Shift + letter as an assignable macro shortcut. My script gives me flexibility in that I can assign any key or combination of keys to trigger any kind of routine, like a PostMessage call, for instance. So while working on my workbook, I might want to press, say, ScrollLock followed by a letter of my choice, followed by another letter of my choice (a sort of super shortcut), resulting in the running of a Macro of my choice in Excel.

View Replies!   View Related
Select Worksheet Based On ComboBox Control Choice
i have a user form with 4 combo boxes and one text box. what i've tried to do is make it so that if the month combo box reads january, then all of the info is placed in a worksheet called january. at the moment it is putting all the info inputted into one sheet. if some one could take a peek at the code below.

If cbomonth.Value = January Then


If IsEmpty(ActiveCell) = False Then
ActiveCell.Offset(1, 0).Select
End If
Loop Until IsEmpty(ActiveCell) Or IsEmpty(ActiveCell.Offset(0, 1)) Or IsEmpty.....................

View Replies!   View Related
Calendar Control To Enter Chosen Month As Worksheet
I have a worksheet that has a Calendar on a worksheet from Calendar Control 8.0.

I want to be able to pick a month from the calendar and press a button to convert the selected month into a worksheet. I have a custom made calendar worksheet that I would like for it to be converted into.

I have uploaded my workbook. It contains the custom calendar worksheet as well as the calendar control.

The file is called "calendar.xls".

View Replies!   View Related
Load Worksheet Picture Into UserForm Image Control
I have an image box on a userform in Excel VB. Is there ANY WAY to load an image into this image box from an object that I have loaded into an excel worksheet something like

If userform1.checkbox1=True Then
userform1.image.picture = loadpicture (Worksheets("Sheet1").shapes("Object 1"))
ElseIf userform1.checkbox2=True Then
userform1.image.picture = loadpicture (Worksheets("Sheet1").shapes("Object 2"))
msgbox "No image"

View Replies!   View Related
API To Retrieve A Webpage Needing Username And Password
I've been playing around with the API functions (specifically, InternetOpenURL) to retrieve the contents of an HTTP webpage and store the information within a text file, using Excel VBA. It works great for any "normal" webpage not requiring a "Username" and "Password" login. I can't find any examples on how this is done for a webpage requiring such a login? I've heard you can do this via sending the appropriate cookie to the server, but I can't find any documentation on the web? Does anyone have any idea on how this functionality is achieved?

View Replies!   View Related
Defualt Zoom
Im using Excel 2007

How do i change the default zoom that excel views documents? Whatever view the last person saved the file as it opens in that zoom. I want it to open 75% zoom no matter what anyone saved the files as.

View Replies!   View Related
Copy Zoom To New Sheet
I have a sub that copies worksheet to a different blank sheet in a different work book. Is there a way for me to set the zoom value on the 2nd sheet (the one being copied to) the same as the 1st sheet?

View Replies!   View Related
Code To Open WS In 70% Zoom
I could need a code (WS code I assume) that open the sheet in 70% zoom every time I open that sheet. For now I get in 75% every time I open it. I guess that WS code will bypass that default setting, or bug, or what ever resets it 75%.

View Replies!   View Related
Custom Zoom Set At 90
If I send a workbook out with the zoom set at 90...will the zoom be at 90 when others open it.? Also, is there a worksheet event that I could insert to force a specific worksheet to always open with the zoom at 90??

View Replies!   View Related
Center On Zoom In A Frame
I am developing a form for emergency dispatching. One of the features of this dispatch sheet is that there are several maps in it that open on a seperate form. The map form has 4 maps that are picture files in an image. these images are in a frame. The different images are selected using option buttons. Given the background above, my problem is this. I have code that zooms in 50% each time the Click event for the image is fired. wht i am trying to do is make the zoomed view center where i clicked. this is the code that i have so far but it doesn't work all that spectacular, the closer I zoom in the further out of center the place i clicked gets untill it is out of view.

Private Sub Layout_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
CurrentX = X
CurrentY = Y
End Sub

Private Sub PlantLayout_Click()
If Frame1.Zoom < 400 Then Frame1.Zoom = Frame1.Zoom + 50
frmmap.Frame1.ScrollLeft = CurrentX - (Frame1.Width / 2)
frmmap.Frame1.ScrollTop = CurrentY - (Frame1.Height / 2)
End Sub

View Replies!   View Related
Dropdown Text Very Small At 55% Zoom
I have a form that has been set up at 55% for best view. The only problem I have is that all the dropdown boxes (List) that i have the text is extremly small. Is there anyway of changing the size of this text? just the size of the text in the dropdown not in the cell after the selection is made.

View Replies!   View Related
Page Setup And Zoom Property
I was curious if in VBA is there a way to switch in the page setup from Fit to X Page by X Page to the Scaling %.

I have set all my pages to fit 1 x 1 and would now like to know the scaling % (Zoom) of the sheets.

View Replies!   View Related
Form Picture To Zoom-in On Mouse Over
I'm not sure if i've dreamt this or read it somewhere and if i have read i can't remember for the life of me.

I have a picture on a form of mine and what i want is when the user hovers over the picture, the image zooms in by x percent.

View Replies!   View Related
Capture Print Zoom Value Before Printing
In a previous, expired thread, the following code was suggested as a way to capture the page-setup zoom value after setting PagesTall and PagesWide. It works fine when single-stepping in the VB Editor and when run directly by the user, via a button click or Tools=>Macros...=>Run, but fails when run under a Worksheet_Activate() event call.

Does anyone understand why that is and/or have a fix or workaround?

Sub X()
Application.ExecuteExcel4Macro "PAGE.SETUP(,,,,,,,,,,,,{1,#N/A})"
Application.ExecuteExcel4Macro "PAGE.SETUP(,,,,,,,,,,,,{#N/A,#N/A})"
MsgBox "Zoom factor is " & ActiveSheet.PageSetup.Zoom

End Sub

View Replies!   View Related
Zoom Worksheets To Fit Used Range
to apply a zoom to Fit Selection on all worksheets upon file opening? I've read many posts on this and understand how to apply this via worksheet activation, but haven't discovered how to make this to happen to all worksheets when the file is opened.

Zooming the selection needs to happen in the workbook module due to additional sheets being added at random and because it will facilitate the flow of the meeting so that we don't have to wait for the user to select and zoom.

Private Sub Workbook_Open()

Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets

LCol = Cells. Find("*", Range("A1"), xlFormulas, , xlByColumns, xlPrevious).Column
Range(Cells(1, 1), Cells(1, LCol)).EntireColumn.Select

' Need code help here to apply to all worksheets
ActiveWindow.Zoom = True ' this works for the worksheet activation event only

Next ws

End Sub

View Replies!   View Related
Adjust Zoom With Scroll Bar
I've used various "zoom" searches and can't find what I need. My users have different amounts of toolbars so the amount of screen space changes. I need to zoom so 4 graphs show. Am looking to enable the user with a scroll bar where the user could click / slide the control to change the zoom size on the screen so they can see the 4 graphs at their preferred "zoom".

I would prefer a control on the sheet and link it to a macro (or line of code if that's the proper phrase) and let the user decide (some people will want bigger zoom due to eyesight etc).

Private Sub ScrollBarZoom_Change()
ScrollBarZoom.Value = ActiveWindow.zoom.Value
End Sub

But I get Runtime error '424': Object required. Auto Merged Post Until 24 Hrs Passes;Nevermind. I found it. Answer was:

Private Sub ScrollBarZoom_Change()
ActiveWindow.zoom = ScrollBarZoom.Value
End Sub

View Replies!   View Related
Scroll & Zoom Sheets Simultaneously
I have a workbook of 6 Sheets, what i want is that if i scrolled or zoomed one of the sheets i want all other sheets to be scrolled and zoomed accordingly identically.

to explain more: say I'm on "sheet1" and I scrolled down so i'm seeing range(K225:X250), now if i switched to any of the other sheets i want them all scrolled to the same range. so whatever sheets i choose i want to see range(K225:X250) in the same viewing properties "zooming".

View Replies!   View Related
Magnifying Glass To Zoom The Entire Screen !
Here is a Magnifying Glass that you can use in Excel I am not sure about the usefulness of it in the normal day to day use of Excel but it's cool and was challenging to programme. The actual round Glass is actually a simple XL userorm whose standard styles were changed.

Here is a workbook example :

Just point to the round Glass with the mouse and move it around the screen to zoom in. It worked on my machine quite smoothly.

Here is the code that goes in a userform :

Option Explicit

Private Declare Function StretchBlt Lib "gdi32" _
(ByVal hdc As Long, ByVal X As Long, ByVal Y As Long, _
ByVal nWidth As Long, ByVal nHeight As Long, _
ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, _
ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long.............

View Replies!   View Related
Graphically Adjusting Zoom Using A Scroll Bar
I am created a very simple account plan for colleagues in my team which is proving to be very poular with the exception of one thing.

I created the plan which is around 30 sheets on my laptops highest resolution setting. 1400 x 1050. Only one other colleague has this res available so of course when the rest of the team open it, it looks huge.

I need help with this as I'm still very new to excel, although learning very fast!

My preference for finding a fix for this would be to insert a scroll bar on each sheet that, when scrolled, changes the zoom of the page between a range of 50% and 100%. This may not be the best way of doing it but I'm trying to make the sheets as simple to use as possible as some of my colleagues are only just compuetr literate, let alone excel competent!

View Replies!   View Related
Insert Image - Center & Zoom
I have a worksheet (Covers) that is going to be the front and back covers for a binder.

The title/text portion is automatically filled from cells elsewhere in the workbook.

I have a button to bring up a userform that allows one to select the images (3 .jpg images) you wish to use on the cover pages.

I have code that successfully brings up the userform, and allows image selection and preview within the userform.

Now I want to insert these selected images into the worksheet, centered on specified cells and sized (zoom) to a maximum width/height (whichever is reached first).

Can a blank Picture be inserted with its size specified/fixed, then use code (Image1 = LoadPicture?) to change what is displayed?

Or do I have to calculate the size, center it on the page, and insert the image each time?

The code (in part) for the UserForm looks like:

Private Sub SelFcvrImg_Click()

Dim FCpicName As Variant
ChDir ("S:DanBuilder Logos-Photos")
FCpicName = Application. GetOpenFilename(Title:="Select an Image!", _
fileFilter:="Pictures (*.bmp;*.gif;*.tif;*.jpg),*bmp;*gif;*.tif;*.jpg")
If FCpicName <> False Then InsertImgForm.FCoverImgPrvw.Picture = LoadPicture(FCpicName)

End Sub

The UserForm has an Image (preview) with PictureSizeMode set to zoom.

I'm really after the same thing embedded in the sheet...

View Replies!   View Related
Zoom Level Affects Shapes Positioning
Sub CreateRectangles()
X = 1
Do Until ActiveCell.Offset(X, X).Value = 0
X = X + 1
variable = Round(-0.026 * (X * X * X) + 0.56 * (X * X) + 24.7 * X + 5, 0)

Set Box = ActiveSheet.Rectangles.Add(ActiveCell.Offset(0, 0).Left, ActiveCell.Offset(0, 0).Top, variable, variable)

With Box
.ShapeRange.Fill.Transparency = 0.3
.Font.Size = 18
.Font.Name = "Trebuchet MS"
.Text = ActiveCell.NoteText

End With

End Sub

View Replies!   View Related
ScrollArea: Zoom Percentage Prevents Scrolling
I have a workbook with 4 worksheets in it. The first 2 worksheets have a restricted user area of A1:Z48.

Private Sub Worksheet_Activate()
ScrollArea = "A1:Z48"
End Sub

On the first one of these sheets the user cannot scroll around the sheet unless they change the zoom percentage to 85% or above. The second sheet, which is almost identical, and has the same scroll area does not suffer from this problem.

View Replies!   View Related
Zoom Or Expand Line Chart X-axis
I have an Excel chart as a separate worksheet. It has 10,000 data points. Is there a way to Zoom in on the X-axis only. I am looking to expand or zoom the X-axis to take a closer look at the individual data points. Since I have 10,000, I need a way to take a closer look at an area defined by the mouse pointer. Can this be done with VB code? I am not looking to expand or zoom the "Y" axis, this can be done with the scale values. Can this be done with a mouse drag or double click on the area of the chart I want to expand.

View Replies!   View Related
How To Size App. Window To Fit Cells? (not Zoom)
This "smells" like a simple question, but I've had no luck finding a way to [programmatically] adjust the App.Window to fit around some cells.

I've found "Application.Goto", also the Application.Width/Height setting. The App.Width setting is pixel based, so if there's an easy way to know a cell's pixel-location, that'll work too!

View Replies!   View Related
Custom Event Macro - Respond To Zoom Change
how I would create an event macro that will synchronise the zoom % of 2 sheets?

E.g. if I change the zoom on sheet1 to 80% then sheet2 automatically change to the same? And the same the other way round...?

View Replies!   View Related
Copyright © 2005-08, All rights reserved