Do you follow Eric Ligmans Blog? He’s giving away more than a million eBooks. Get yours today!
Place the following in your “ThisWorkbook” module inside the vba editor.
‘ Upper_Case Macro
‘ Change Value of Selection to upper case
‘ Keyboard Shortcut: Ctrl+t
Dim myCell As Range
Set myCell = Application.ActiveCell
.Value = UCase(.Text)
Then assign a shortcut to run the routine. (I use Ctrl+Shift+T) Then as you work in excel, you can select a cell that you want to format as upper case text and press your shortcut to reformat it.
…now back to work!
I am writing a quick select case this am and remembered something I thought I’d share with you. Don’t worry about closing quotes around strings when it is the last character on the line. The VBA editor will do it for you when you hit the enter button. So my shortcut was to copy the beginning of the plotstyle name and Case statement to the clipboard and for each new line I simply paste, add the end of the style name and hit “Enter” key. The VBIDE adds the close quote for me.
Here is what I paste from the clipboard – Case “Black-
I added the word: XBold and hit return. The result is shown below:
- Use the acfocus control (allows you to keep the form visible on the screen while you interact with entities within your file.
- Find the schedule property and get the associated space or room object.
I installed the recently received Autodesk Revit Architecture 2009 application on my laptop the other day. In browsing the DVD, I noticed a folder titled VSTA. If you want to install the Visual Studio for Applications for use with Revit, pick the bottom installer option for tools and utilities as shown below.
I didn’t see any mention of this in the documentation, readme, or the installer for the basic product. I did see reference and tutorials in the SDK install, but one has to know to look for these. I found a cryptic mention of this in the New Features Workshop. If you look in the Revit Architecture Help file, you’ll find mention of “Creating Macros with Revit VSTA”…grab Gregory Arkin’s pdf version using the link below.
- Install the Revit Product First
- Go back to first page of installer and then install the VSTA tools.
The install is much improved in this release…much faster too!
Now lets see how it runs…..
Note: The product install forces an install of Design Review 2009. This may impact those of you running the BIM Smart Library by Reed Construction Data. If you create a deployment, you can potentially modify the installation.
Links: Looks like other sites have more info on this.
Often when archiving or sending files to consultants, it is desireable to do some house cleaning prior to transmitting them. A common practice in cases like these would be to detach any unnecessary XRefs. And what is more unnecessary than a previously unloaded xref?
Public Sub DetachUnloadedXrefs()
Dim o_Blk As AcadBlock
For Each o_Blk In ThisDrawing.Blocks
If o_Blk.IsXRef And o_Blk.Count = 0 Then
ThisDrawing.Utility.Prompt o_Blk.Name & _
” is an unloaded xref and has been detached.” & vbCrLf
Hope you find that useful.
Need to migrate your layer keys in AutoCAD Architecture 2008? I updated the routine to work in 2008. Get it here.