Master .dic and .vba files
In GP7.5 I have 20 or 30 users that should have the same .dic and .vba files
and access to forms/reports are controlled by security.
Will I run into problems if I maintain a "master" of these files and when a
form or report changes simply push the master .dic and .vba files back to
the individual desktops?
I've done this by storing the master copies of the files on a network
share and placing a .bat file in the startup folder on each client to
copy these files down to their local drives.
...MVP's?? Why is Excel 97 VBA much faster than Excel 2002 VBA
I don't know if anyone knows why, but it seems that Excel 97 runs for next
loops at about 25 times faster than Excel 2002.
In Dec 2002, I created a workbook using the code attributed originally to
Bob McCormick to break worksheet passwords and later modified by Norman
Harker to break workbook passwords that automatically looped through a
workbook and unprotected the workbook and all sheets with the same or
I incorperated a rough timer into it so it showed at the end approximately
how long it took to unprotect the wb and all sheets.
Using Excel 97, it consistently...Help with Report Write and VBA
Two things I am trying to do. First I am trying to access fields in
unrelated tables in a report. I know this can be done but I do not know
where to start.
Second I am creating a new UserForm window. When that window is filled out,
the user click "Save" and the info on the windows goes to a custom (I made)
table. Do I really need to know where the UserForm1 is saved or do I need to
push the info out???
Any help would be much appreciated.
I have a VBA example of how to get data from other tables using VBA,
RetrieveGlobals, ADO and ...Lookup VBA
I have a workbook with 2 sheets.
I am looking for a short procedure that detects if there, in sheet 2, is any
occupied cell in column K (K4 and down) with no data in the cell to the right
(column I). Then a message should pop up saying: "Please update the sheet".
Dim k As Long, i As Long
k = Cells(Rows.Count, "K").End(xlUp).Row
For i = 4 To k
If Cells(i, "K").Value <> "" And Cells(i, "I").Value = "" Then
MsgBox "Please update the ...Additional VBA controls?
When I open the 'additional controls' dialog I see a bunch of controls
apparently placed there when various applications were installed. Does
their presence in the 'available controls' list really mean that they can be
used or is it just a side effect of installing the program? More
specifically, there is a Quicken class. I've tried to use it and every time
it causes Excel to crash.
A controls presence in the list means only that it has been registered with
Windows and can be used under certain circumstances in certain types of
programs. It do...Excel VBA: Dropdown Box and Image Color Change
I have drop down boxes (with values of red, blue, and yellow) and after
I select a color - I would like the drop down box color to feed into an
image (T-shirt) so that is is changed the color of the shirt is
For my image, I am using an embedded Flash Movie. I don't know if this
is capable - any creative ideas are welcome.
Message posted from http://www.ExcelForum.com/
...VBA code to go to a bookmarked drop down goes to wrong drop down
I am using vba code to perfprm a variety of tasks; the code is working fine, except, the last action before re protecting the form is to go to a specific bookmarked drop down 'byelaw1' but it goes to 'byelaw2' instead:
If ActiveDocument.FormFields("pclassificationDD").Result = "CASB(B)/ Offences against park byelaws" Then
ActiveDocument.FormFields("Classificationtext").Result = "(In accordance with the LBS 'Byelaws for Pleasure Grounds, Public Walks and Open Spaces' November 2008)"
ActiveDocument.Unp...Open a program and program file from Access VBA
OK. First off, I am wanting to know if this can even be DONE :) I am wanting to program a command button on a form to open another application and then run a file pertaining to that application based on the "part number" value in a field on a form. I know that command buttons can be programmed to open applications using the command button wizard. However, (an this is just my train of thought), can VBA take the value from the part number field, then look into a specified folder (or two) and find the file to open? Any help on this is most appreciated. Thanks :) Yes, VBA can tak...Formatting footer in VBA code
I have this bit of code in a macro that I would like formatted, but I do not
know how....the code is to automatically insert the file path and the tab
name of a spreadheet....I would like to format the code, so that every time
it opens a document it will make the font Arial size 8. What I have now only
makes the "&A" (which is the tab) size 8......
Here is the string....
.CenterFooter = ActiveWorkbook.FullName & Chr(10) & "&""Arial""&8&A"
Any suggestions would be great!!!!!!!!!!!!
I'm not sure I foll...VBA
Ok, all you expert Excel users may think this is dumb.....but what is VBA?
And what do you use it for? I looked around and can't figure a thing out.
Visual Basic for applications. Used to write macros/programs. As a
"Kim" <Kim@discussions.microsoft.com> schrieb im Newsbeitrag
> Ok, all you expert Excel users may think this is dumb.....but what is
> And what do you use it for? ...Copy and Paste using VBA.
If A1 is not blank then Copy A1 and Paste in A2:A7.
I originally had simple links in cells A2:A7 that connected to A1. But
sometimes one of the cells in range A2:A7 may manually have a value typed in
them, which erases the link to A1.
I thought trying this using VBA would eliminate the cell linkage loss.
I'm new to VBA.
Any suggestions would be appreciated.
Right-click the tab for the sheet where you want this to apply, select "View
Code", then paste in the code below. If you really want it to behave the
same as a link, then I'd take out ...Clipboard acces via VBA
How do I clear the clipboard using VBA in Excell
Message posted from http://www.ExcelForum.com
Try code like
Application.CutCopyMode = False
Microsoft MVP - Excel
Pearson Software Consulting, LLC
"Wimpie >" <<Wimpie.email@example.com> wrote in
> How do I clear the clipboard using VBA in Excell?
> Message posted from http://www.ExcelForum.com/
... looking out across...excel vba
I have this formula in cell K47, but it comes up as #VALUE, what i
Message posted from http://www.ExcelForum.com
=IF(H15="some name",SUM(K42:K44,K46),IF(H15<>"another name",SUM(K42:K46),"")
"chief >" <<firstname.lastname@example.org> wrote in message
> I have this formula in cell K47, but it comes up as #VALUE, what is
...VBA: Detecting multiply selected sheets
Hopefully someone can help me with this, cause I can't seem to find any way
to do it...
I am trying to write a bit of code that will cycle through only the sheets
that I have previously selected by clicking on their tabs (holding down
'ctrl' as if selecting multiple sheets to print) then do <something> with
each of these selected sheets, ignoring the others in the workbook. I'll be
stuffed if I can see how to do it though! :(
Dim wkSht As Worksheet
For Each wkSht in ActiveWindow.SelectedSheets
&...Create error msg based on calculation result in formfield using VBA
I have a protected Word 03 form with a 2 column table in it (A1:B8).
In the table are 3 manual entry textbox fields that you can enter
dollar amounts into (B1, B2 & B3), and the remaining 5 fields (B4, B5,
B6, B7 & B8) have formula calculations. B4 is the sum of B2+B3. B5 is
a percentage ratio of B1/B4.
Basically what I'm trying to do is pop up an error message when B4
(the sum of B2+B3) is less than the dollar amount entered into B1. Or
another way of writing it is if B5 is greater than 100%, I need the
error message to pop up. Sometimes my code works, sometimes not, and...find question on vba
I define two find
1. Find Key
2. Find Item
In find key, the cell formula is =G2&"|"&V3&"|"&J2. I check the data,
the find can not able to find a key value.
The key value is on target sheet. But the find return nothing.
What is the problem on data case return nothing ?
Set Rng_KEY = .Find(What:=GPD_KEY_VAL, _
My question is: In the first part of this code I set c, d, and e equal to
the S8, T8 and U8 ranges respectively. However, when I use them in my
sumproduct formula at the bottom of this code, they return P8 for c, Q8 for
d, and R8 for u. What's the deal? Thanks!!!
Dim m As Long
Dim n As Long
Dim o As Long
Dim p As Long
Dim q As Long
Dim r As Long
Dim s As Long
Dim x As String
Dim w As String
Dim a As Range
Dim b As Range
Dim c As Range
Dim d As Range
Dim e As Range
Set a = ActiveSheet.Range("I8")
...How do I paste a graphic from Access datasheet to Excel using VBA
I'm trying to paste a graphic currently in an Access table (along with other
data) into a spreadsheet in ERxcel. all other data pastes perfectly ok but
the picture will not ? ?
...Expand/Collapse sub-Bullet Animations
Looking for an easier way...Trying to show three headings on a slide,
let's says with 2 bullets under Heading 1, 3 bullets under Heading 2
and 5 bullets under Heading 3. I can easily make all the bullets
appear/disappear. What I'd really like to do is first show all three
Headings only. Then on next click, make the bullets from Heading 1
appear while the Headings 2 and 3 move down. Then on next click, the
bullets from Heading 1 disappear, Headings 2 and 3 move back up and
the bullets from Heading 2 appear while Heading 3 moves down and so
In other words, I want the &q...How to remove attachment in macro or vba code
Is it possible to access any of the builtin dialog boxes especially the one
I am trying to replace the use of OLE in Access 2000 to display text or
picture files in a form with the file and folder specified in other fields.
...VBA code needing alteration
I am a novice with VBA and require alteration to this code, if possible
What i have now is the first 3 rows copying across. What i would lik
is to have selected cells in the row copy. ie: a1, a2 and a4. Is thi
possible?? Thank you
Private Sub Commandbutton1_click()
CopyData Range("E90:E100"), "MODEL"
CopyData Range("E105:E113"), "UV CURING"
CopyData Range("E118:E134"), "TRANSFORMER"
Private Sub CopyData(rngC As Range, Target As String)
Dim rng As Range, cell As Range
Dim rng1 As Range, rng2 As Range
Dim rng3 As Range
Dim nrow...Appending tables using VBA
Say for example I have two huge tables I want to append together, out
of the 200 fields, 190 of them have exactly the same name and will be
mapped to exactly the same place, but the rest 10 do not have the same
name although they do have a corresponding mapping to the target table
(say field: "Last Name" mapped to field name "LName" and so on), now,
one way to write the SQL string is of course to map the field one by
one, but is there anyway I could just write out the mapping of the 10
fields that are different and save the work to write out the mapping
of the rest 1...Passing a value in VBA using an offset
I have code that executes when I double click on a cell. The code
inserts the data validation source into a combobox to ease the input
choice. It refers to the cell I double clicked as "target"
I want to add a new feature. Before anything else happens, I want to
filter the data validation source (many of the entries are for dates
that don't apply. the cell above "target" has a date. I want to copy
the month of that date into a fixed cell ("A1") and then use that date
in an advanced filter on the data validation source. Hope you're with
me so far.
I am using Excel 2002, and I am trying to create a macro to compare tw
columns of data and highlight or shade the cells or colorize any entr
that is not in both columns.
I also read something about being able to put a button on the exce
chart that runs the macro. Could someone help me with that too? :
Message posted from http://www.ExcelForum.com
Chip Pearson has lots of ways to compare two lists.
Some are macros and some are worksheet formulas.
(I'm not sure I'd start with code. Learning the formula technique may be much
more usefu...VBA needed to delete corrupt records from MsysObjects
I have a form that will not open in normal or design mode and there are 2
Form_~TMPCLP######## objects in my VBA Project window, and there are 2
Objects with the same name in the MsysObjects table of type 32678 which means
they are forms. I expect that if I am able to delete these I might be able
to salvage my form.
However, Nothing I have tried allows me to delete anything from MsysObjects.
OH there is one other issue, Not able to run any code from the data base
with that form in it. I get a message that the module can't be found...
Nothing specific. So I have been ...