Answer Questions
Keale Projects, objects & modules
I started learning VBA in MS Word yesterday. I have some programming experience in C++ and Java. I am trying to understand how the environment is structured and what Projects, Objects and Modules represent. For example I recorded a few macros using the macro recorder and then opened the VB Editor to see what was created. I notice that under "Project" are 3 folders. One is named "Microsoft Word Objects". Within this folder is what looks like a file named "This Document". What does "Project" represent What does "This Document" represent What is the difference between "This Document" and the "Project&q ...Show All
vish2007 [Excel] How to convert Excel to jpg, gif image?
How to convert MS Excel to jpg or gif and paste/insert to MS Word thank you very much I assume you're talking about simply taking a screenshot of the viewable range of the MS Excel document for insertion into a MS Word document. Do you need to do this programatically If not, just hit PrtScr on your keyboard, paste it into MS Paint, save it, and insert it into the Word document. If you need to do this in a program, you've got two obstacles to overcome as I see it: 1.) VBA doesn't provide a "native" method for taking screenshots (as far as I know). I believe you'll need to access the API to do this. If this does turn out to be the case, I can help you out with code ...Show All
Wasim Javed Setting DisplayFullScreen in Excel: 2 issues
I want to set Excel to use full screen mode immediately the workbook opens. In a test spreadsheet I have used both of these approaches (independently): 1. Create a macro called Auto_Open and record the mouse actions View | Full Screen 2. Use the VBA code: Private Sub Workbook_Open() Application.DisplayFullScreen = True End Sub In the test workbook both methods work fine. However I don't want the floating "Close full screen" box to be displayed. Question 1: Is there any way to inhibit this box On my real application, method 1 works OK but method 2 does not work - ie the full screen mode is not invoked. Question 2: Any ideas why method 2 (which I would prefer to use if possible) should fail There are no other macros or ...Show All
js06 How to track changes
Hi Can any one tell me how to track the changes brought by other admin users in ISA server or any option modified by them. Any log or .... any one The problem is, that Microsoft do not believe that companies big enough to have multiple administrators would use an ISA server. We have the exact same problem. Best bet is to look in your event log to see who logged on to the server when changes was done. MS needs to make basic security, lige segregation of duties, part of the minimum standard for their products. is there any one to give me answer Muhammad Essa wrote: Hi Can any one tell me how to track the changes ...Show All
DaveSmith Microsoft Office Document Imaging Printer Missing in Office 2007 (RFP) (86)
Can anyone tell me how to install Microsoft Office Document Imaging Printer in Office 2007 (RFP). Although the Imaging program installs, the Printer does not, and the Microsoft Office 2007 Professional (86) Installer say that it is not an available feature. Thank you this solution worked for me! The answer given here for is one who is having MS Office 2003. Let me know the answer for MS Office 2007 for Windows XP SP2. When I click change nothing happens. The Enterprise setup dialouge box appears for about two seconds, then disappears and nothing else happens. I need this printer to be able to accept internet faxes. Sounds gr ...Show All
ahmedilyas hidden versus visible in pivot tables
I am trying to determine the number of rows and columns that are viewable in a pivottable. As the source data changes, new values will be displayed so the dimensions of the table range will change. Is there a quick way to get the viewable rows and columns My objective is to define a chart using the internal datarange of the pivot table and by-pass the autoPivotChart behavior in order to retain control over the structure and format of the chart. Note: this is not the same as visible as when you restrict the pivottable using a Page value, not all potential items will be viewable but their pivotitem.visible property will be true. Solved. I did some more research of the object model and found the addre ...Show All
script Setting the Directory at GetOpenFileName
I've been trying my best to set the directory by default when I use the Application.GetOpenFileName at VBA Excel. For example, I want the user to find the files at c:\MyReports path, the GetOpenFileName shows the files at c:\My Documents or any other path. Is there a way to make it at c:\MyReports or anywhere I want within the network ChasAA wrote: Hello, There is no path parameter you can use in the GetOpenFileName method but use Chdir before it. Then you dialog box will open with that directory. eg Sub getFile() ChDir "C:\Chasdev" fileToOpen = Application _ .GetOpenFilename("All Files , *.*") End Sub Cheers ChasAA Thanks a lot ChasAA! It ...Show All
Learning VB Upgrade problem Access 97 and Access 2003 on same machine
Hi We have finally started to upgrade to Office 2003, I still have a copy of Access 97 on my machine to maintain databases which cannot be upgraded until the roll out is finished. However, when I run my code now I am getting a problem. Access 97 now will not use the Trim$ function is an SQL statement, I get a message that the function is not available. Trim$ will work outside of an SQL statement e.g. Debug.print Trim$(" some text ") Any ideas where my problem stems from ...Show All
CIAndrew Highlight Row depending on truncated text - Excel VBA -
Is there a way to highlight a cell if it has truncated text like the cells that show #### Thanks in advance for your help! -Lyosha Hello You can use a Range object's Text property to specify or determine the text the range contains. For example, the following code selects the row that conatins the text "##" Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range) Call SelectRowContainingSharpText End Sub Private Sub SelectRowContainingSharpText() Dim rng As Range For Each rng In ActiveCell.Rows.EntireRow.Cells &n ...Show All
David I. McIntosh If... GoTo
Hi, I struggle on this one. I want to search a workbook for a worksheet named 'STAT'. If that is found the function shall GoTo 'Start:' else I want it to GoTo 'Manual_Pick:'. Here's the code as I wrote it. It works fine when there is a worksheet 'START' but if there's not it doesn't GoTo Manual_Pick. Dim ws1 As Worksheet For Each ws1 In Worksheets If ws1.Name = "STAT" Then Worksheets("STAT").Select If ws1.Name = "STAT" Then GoTo Start If ws1.Name <> "STAT" Then GoTo Manual_Pick End If Next Star: ...some code... Manual_Pick: ...some code... Any ideas Best regards \Jonas Ehh stupid of me thanks! First, try to get rid of those Goto ...Show All
Terry Mohre SendKeys from Excel
I'm trying to send information to another application using the SendKeys function but it isn't working. The primary code that I'm using is: ActiveWorkbook.FollowHyperlink Address:=" http://www.aasb.com.au/public_docs/aasb_standards_2005/compilations/AASB101_07-04_COMP_11-05.pdf ", _ NewWindow:=True AppActivate "Microsoft Internet Explorer" Application.SendKeys "^F34.~", True. Sometimes I get an error on the AppActivate statement and sometimes the SendKeys function works but not all the time. Does anyone have any suggestions about what I'm doing wrong for it to not work all the time Derek, Thanks very much for that. I've tried adding the wait and it seems to have done the trick. I'll r ...Show All
Sam_res03 Configuration Failed: Windows SharePoint Services 3.0 (Beta)
Downloaded SharePoint Services 1.I selected Basic Button “install single server stand alone using default settings 2.Closed SharePoint Service Install and checked to start the configuration wizard. 3.Next I said yes to the popup message: The following services may have to be started or reset during configuration: Internet Information Services SharePoint Administration Services SharePoint Timer Service Choose yes to restart the services if required and continue with the configuration wizard or no to exit the configuration. 4.It starts to configuring SharePoint Products and Technologies. 5.Then I get: Configuration Failed One or more configuration setting failed. Completed configuration settings will not be rolled back. Resolve the problem a ...Show All
Ather. Happy Holidays
Hello!!! I only want to thank you for the supporting. Thanks Team!! and wishing to you a Happy Holidays and an awesome 2007. 'Till next year. ...Show All
R.Tutus Auto Indentation for VBA
Hello, I am still new to VBA IDE. I am wondering if there is add-in or tools to make VBA do auto indentation like Eclipse editor for Java. Any help are very appreciated. Thanks in advance. Yes, I am looking for a tool to restructure the indents automatically. Thanks anyway. Go to Tools|Options. On the Editor Tab there is a "AutoIndent" checkbox. I'm sure you can handle it from there. (unless you are looking for a tool to re-structure the indents in poorly indented code.) rusty Excel MVP Stephen Bullen has a Smart Indenter add-in on his web site, two versions in fact, VBA and VB6. Stephen's site is at http: ...Show All
RubenPieters Select with macro based on criteria
Hi, I am a newbie trying to self teach VB. I am pretty useless so please be gentle. I am trying to write a macro to allow me to select text in MS Word based upon its case. I want to select all the text in the document that is in all caps. Is this possible Also, is it possible to exclude 34 specific two letter strings of text The reason for this that specific "class codes" need to appear in in caps. Can anyone help As i said, i am pretty useless at this stage, so sample code would be awsome. Josha Write a line in you document for example Hello this is MYSELF writing this and then run this little piece of code Sub test() For Each wrd In ThisDocument.Words teststr ...Show All
