| How do you hide macro names from showing in "Tools"? |
|
 |
Index ‹ Excel ‹ Excel Programming
|
- Previous
- 1
- 2
- worksheet functions >> with weekly score sheet how do I column a weekly progressive aver.I am doing a Darts score sheet in excel 2003. I have "game scores", "game
shots", "game average", "games played", "(sum)total scores", "(sum)total
shots", "(sum)total average", improvement increase\decrease percentage, and I
have even done a "bar chart". What I can't work out is how to formulate a
column for "progressing average".
The only way I can get "progressing average" at the moment is by formulating
ONE cell as "(sum)total score"/"(sum)total shots" then entering the result
manualy into the corresponding cell so that the players can see how they are
averaging (up or down).
Any solutions please? don't make it too hard and complicated, I'm only "self
taught"
over about 5yrs and I'm still finding out lots of things.
- 3
- worksheet functions >> Linear regression errorsHi,
I have a set of data. When I graph the data on a scatter
plot and add a linear trendline, I also get an equation of
the line along with R2. However, when I use the worksheet
functions CORREL SLOPE and INTERCEPT I get different
values than the ones on the graph. Why? Please post back
Thanks,
Mike S.
- 4
- worksheet functions >> Counting unique items based on dateI have a sheet, with each row containing one record. Column A contains a
date, and column B contains a department. The contents of the column A
(date) are either a simple date "dd/mm/yyyy" format or a timestamp e.g.
"dd/mm/yyyy hh:mm:ss". Duplicates are allowed in Column A, Column B, Column
A + Column B.
I needed (ideally) a worksheet function that would allow me to obtain the
following information:
Based on a START DATE, END DATE and DEPT NAME return to me the number of
times I have the DEPT NAME occuring in my data for between the START DATE and
END DATE (both dates included) but counting multiple rows for the same date
as only 1 record. Thus if I have 27 rows for the same department with date
July 15, then it should give me only the value 1.
The time-part in the timestamp format can be ignored. It exists because of
input data coming from various sources and some sources store time and some
do not store time.
How could I do the above with a worksheet function?
Many thanks.
- 5
- Excel Misc >> Excel 2002, Menu and Tool bars are gone.Hi,
Just had a call from a user that her Menu bar (File, Edit,
View, Tools, etc...) is gone from all spreadsheets.
I cannot restore them due to the menu bar being gone. How
can I replace this without using safe mode?
Any help is appreciated.
- 6
- 7
- Excel Programming >> Import xls file..vba excel2000Hello,
How can I import the contents
of an .xls file on users harddisk
to the current worksheet via
vba?
Or better way to get the xls data
of a file to my worksheet which
holds my macro to do the work
needed.
Thanks For Your Time.
Cheers,
Paul
- 8
- Excel Programming >> How can I check if a pop-up menu exists...Hi All,
Help with another (probably easy for you all) question. I use the code
below to add a pop-up menu that runs a macro.
On Error Resume Next
With Application
.CommandBars("Cell").Controls("GICAP Formatter").Delete
Set cBut = .CommandBars("Cell").Controls.Add(Temporary:=False)
End With
With cBut
.Caption = "GICAP Formatter"
.Style = msoButtonCaption
.OnAction = "FormatIssuesWorkSheet"
End With
What I need to know is how to check if the pop-up menu exists the next
time the workbook is opened? The "on error" process doesn't work for me
in this case because I need this check in the middle of a subroutine.
However, I continue in the subroutine whether it exists or not.
Can someone help?
Thanks,
Chris
- 9
- Excel Programming >> help with IF statementI need a cell to calculate points based on position finished example if
racer finished 1st then he gets 50 points. another racer finishes 2nd he gets
49 point and so on.
Here what Ive tried but it only lets me enter up to 7 th place. I need it to
go to 50th place at least.
=IF(C5<1,"",IF(C5<2,"50",IF(C5<3,"49",IF(C5<4,"47",IF(C5<5,"46",IF(C5<6,"45",IF(C5<7,"44",IF(C5<8,"43"))))))))
Thanks
- 10
- Excel Misc >> How do I add a theme in Excel?I am doing a project for school and they want me to convert a file to HTML
and then add a theme, but I can't find how to add one. Do I need to add the
theme before converting it to HTML, or is it something totally different?
- 11
- Excel Programming >> I want a non-blank cell to return 25% in an adjacent cell.Spreadsheet keeps track of steps to be completed in a phase of a project. As
each step is complete I want the system to return the % that step worth (1
out of 4 = 25%). I will total each % of each step complete to give me a
total of the phase completed. How do I create a formula for each step of the
phase that will return the %? I thought this should be as simple as saying:
IF C5 is not blank, return 25% (in cell D5). Please help.
Thank-you.
- 12
- Excel Programming >> Organizing functionsGood afternoon everyone,
I've got more of a style question than technical one this time around. I'm
currently assembling all my custom functions and subs into one project. I
have been collecting some over the last couple of projects I've done, so I
thought it might be a good idea to have the ones I use very often together.
I am currently on 50-60 of them. The thing is that I've read so many
different opinions about how to store them.
Should I group them in different modules, or should I just create one big
module and comment every sub I have? Is there a processing-time difference
of having let's say 10 different modules or just having one big one?
Second question: should I save it as an add-in or would you recommend me
saving it as a normal spreadsheet?
I'd appreciate any comment on this matter.
Thanks guys ;o)
kj
- 13
- Excel Misc >> VBA help (and other) pleaseMe again,
A few items:
1) I have plugged this into VB to deny print unless user has selected valid
info from dropdowns:
Private Sub Workbook_BeforePrint_(Cancel As Boolean)
Cancel As Boolean
Cancel = IsEmpty(ShippingRequestForm)(W11, W13, B10, B14, B18, B23,
B37, D37, N37)
Needless to say, ain't workin' & I know nada about VB but trying! Where did
I muck this up at?
2)I have 2 cells with DV (W11 & W13). Trying to make it so user can not
bypass these without choosing from dropdowns. Formula works:
(=IF($W$13="Prepaid,Collect","okay","Invalid"). I can still tab right
through it. If I type anything other than, the error message does work
though. What do I need to add? Additional nested function? Or seperate
formula all together?
3)Dynamic DV list, @ $D$37 for "Description", want same "IsEmpty" rule also
with the ability for me to nest a list of invalid entries ("Documents",
"Docs", "Gift" etc) resulting in error message.
Thx for the email Debra. Gord, Dave et al have been above and beyond. Feel
like I've attended an XL seminar!
Hey Gord, after these my (Your!) beloved Shipping Request Form will be done.
I'll send a copy to you for Xmas! LOL
Thx
- 14
- Excel Programming >> How can I pass an array as TextToDisplay to a hyperlink?I have a procedure that searches through every sheet (108) in a
workbook for matching data then puts a hyperlink to those data onto a
"Hyperlog" worksheet.
here's part of the code
Option Explicit
Option Base 1
Dim hlText(3) as String
Dim rte as string
Dim num as string
Dim street as string
Dim r as Integer
Dim foundNum as Range
.
.
.
r = 3
hlTarget:=foundNum 'result of Find"
a do loop here as long as matches are being found
hlText(1) = rte: hlText(2) = num: hlText(3) = street
Sheets("HyperLog").Hyperlinks.Add Anchor:=Cells(r, 1), _
Address:="", SubAddress:=rte & "!" & hlTarget, TextToDisplay:=hlText()
If I use hlText() or hlText, I get invalid argument error.
If I use hlText(3) only the 3rd element is passed
hlText(1) & hlText(2) & hlText(3) works except when executing the
hyperlink
Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal
Target As Hyperlink)
CenterOnCell Range Target.SubAddress, Target.TextToDisplay
End Sub
fails at .TextToDisplay
What do I do now coach?
Jay
- 15
- Excel Misc >> I need some help with some functionsI have a column of numbers, and what I want to do is return the 7 highest of
the numbers. Then, I want to be able to return the row number of each one
them. The only problem I have is, if two or more of the high numbers are the
same, it will keep returning the same the row number, instead of the next and
so on.
Any suggestions?
Please let me know. lol It's probably an easy answer, I just cant find it.
|
| Author |
Message |
awwtau
|
 Posted: Wed Nov 09 09:50:16 CST 2005 |
Top |
Excel Programming >> How do you hide macro names from showing in "Tools"?
I've written an application and I've protected both the worksheets an
the VBA code. But the macros still show in Tools, Macros, Macros...
A user can still select and run a macro from the Tools menu. I want t
control all macros from the buttons I have on the various sheets of th
workbook. Can I hide the macro names and/or prevent "Run" from bein
chosen?
Thanks in advance.
Nashu
--
Nashu
-----------------------------------------------------------------------
Nashua's Profile: http://www.highdots.com/forums/m142
View this thread: http://www.highdots.com/forums/t307899
Excel526
|
| |
|
| |
|
PeterRooney
|
| Posted: Wed Nov 09 09:50:16 CST 2005 |
Top |
Excel Programming >> How do you hide macro names from showing in "Tools"?
Nashua,
Try putting this at the beginning of the module:
Option Private Module
Regards
Pete
"Nashua" wrote:
>
> I've written an application and I've protected both the worksheets and
> the VBA code. But the macros still show in Tools, Macros, Macros...
>
> A user can still select and run a macro from the Tools menu. I want to
> control all macros from the buttons I have on the various sheets of the
> workbook. Can I hide the macro names and/or prevent "Run" from being
> chosen?
>
> Thanks in advance.
> Nashua
>
>
> --
> Nashua
> ------------------------------------------------------------------------
> Nashua's Profile: http://www.highdots.com/forums/m1420
> View this thread: http://www.highdots.com/forums/t3078996
>
>
|
| |
|
| |
|
| |
|
Index ‹ Excel ‹ Excel Programming |
- Next
- 1
- Excel Misc >> Pivot Table Refresh SpeedHello.
I'm using Excel 2000.
I've implemented a pivot table accessing an Access 2000
database. I refresh the data in the pivot table once a
week, then email a link to my users. The problem is,
whenever I refresh the data in the pivottable, it reads
the data 10 rows at a time usually. Sometimes, it reads
70 rows at a time (at a time being about .5 seconds per
read). Other times, it's even faster. I have a lot of
data, and sometimes the update only takes a few seconds,
other times I need to go make some coffee and socialize.
Any way to speed this up? I've tried setting Excel to the
highest priority in my operating system, but it doesn't do
any good. Both files are local on my hard drive.
Thanks for the help.
-Brad
- 2
- worksheet functions >> Transpose unique values in one column/mult. rows into a single rowWhat is the best way to accomplish this using Excel functions? I have a file
with records that have a four different attributes under one column. For each
product, there are four rows, all the same, with the exception of the
attribute (color, length, width, height). Here is what the fiel looks like
today
Part Number; Part Name; Attribute
101; Part 101; color black
101; Part 101; length 6 inches
101; Part 101; width 1 inch
101; Part 101; height 4 inches
102; Part 102; color white
102; Part 102; length 10 inches
102; Part 102; width 3 inch
102; Part 102; height 6 inches
and so on. How I want to format the data in Excel is like this:
Part Number; Part Name; Color Attribute; Length Attribute; Width Attribute;
Height Attribute
101; Part 101; color black; 6 inches; 1 inch; 4 inches;
102; Part 102; color white; 10 inches; 3 inches; 6 inches
...so that I can see al the unique attributes for that part instead of
reviewing it in a single column. There is one caveat - some of the rows do
not have all 4 attributes.
Is there a way for a function to check the part number and return the
attributes that are currently in a single column; into a single row in
separate cells/columns (preferable on a separate worksheet)?
Any advice will be greatly appreciated. Wil
- 3
- 4
- worksheet functions >> SUMPRODUCTI am trying to create a formula to count the number of text entries in that
match two criteria. This is as far as I have been able to go. Both fields are
text.
=SUMPRODUCT('Main'!A1:A1884<>"")*('Main'!C1:C1884="STHHH")
- 5
- Excel Misc >> I cannot find an error in excelI have read other answers, but no help. This is simple math, but when I put
a formula in as simples as =sum(F9+F10) or =sum(F9:F10), it is adding or
deleting a penny in my total column...help
- 6
- Excel Programming >> Creating formulaPlease, help me! I am trying to program my restaurant/bar schedule so that
if I try to enter a shift for an employee who is already scheduled for a
shift elsewhere, it will alert me or disallow the entry.
Thanks so much!!!!!
- 7
- Excel >> Deleting characters after a hyphenI have an excel sheet with a column of about 50 products (get this exce
sheet weekly).
What I need to do is they have keys in the column like
- c4500-fds5
- cdfa4500-94kp
- c234500-94d
- eee4500-o430
- czzz4500-ei5
I need to delete everything (batch wise if I can) so it deletes th
hypen and all the characters after it so it shows
- c4500
- cdfa4500
- c234500
- eee4500
- czzz4500
anyway to do this in excel
--
TheIO
-----------------------------------------------------------------------
TheIOU's Profile: http://www.excelforum.com/member.php?action=getinfo&userid=3410
View this thread: http://www.excelforum.com/showthread.php?threadid=53872
- 8
- worksheet functions >> VLOOKUP-common look up entry with multiple resultsHello...
I need to have the following in a file:
Order Serial #
123 ABC
123 DEF
234 GJH
234 JKI
When I vlook the order number to get the serial #'s into another file I only
get the first instance... eg if I vlook the serial #'s for order 123 I only
get ABC returned.....Is ther a way to get multiple results for common lookup
value...
Thanks
- 9
- 10
- Excel Programming >> Problems with an if (using rng Nothing) - only to produce sheet givenHi,
I am very glad for all the support I have received over the last
couple of days. I have now a problem. Given that there is already an
existing sheet (in this case "Global - " & ConditionSize & " Banks" ),
the code works smoothly (thus not producing a new sheet since it is
already there). But if the sheet is not there, I want the rng to still
be Nothing and thus it should produce a new sheet. But if the macro
can't find the sheet in question it says "Run Time Error '9':
Subscript out of range". I understand the problem encountered, I just
don't know how to get around it. I'd rather not use On Error Resume
Next.
Any suggestions?
Code:
'Copies the RawData sheet to a new sheet
If Sht2 = "Global - " & ConditionSize & " Banks" Then
Set rng = Nothing
Set rng = Worksheets(Sht2)
If rng Is Nothing Then
Sheets(Sht).Copy After:=Sheets("Assumptions")
Sheets(Sht & " (2)").Name = Sht2
End If
Else:
Sheets(Sht).Copy After:=Sheets("Assumptions")
Sheets(Sht & " (2)").Name = Sht2
End If
Regards,
Peder
- 11
- 12
- Excel Programming >> command ButtonHi, With one instance of excell open, I have a command button on
sheet1. I open another instance of excel. Id like to be able to click
the command button on workbook1 and tell workbook2 that its Range("a1")
= a certain value. Any Ideas. Regards Robert
- 13
- 14
- worksheet functions >> timed macroMy customer has a WS, with a pivot table. In the WS he has a button
with a macro which sorts the pivot data into suppliers, and make a view
screen specific to each supplier. The problem is he has to remember to
push the button !!! Does anyone know if it is posible to run this
macro automatically, so that it exicutes every morning @ 8:00 am. Can
you add code to the macro, or does it have to be something completely
different.
Thanks
- 15
- Excel Misc >> My large numbers are showing up as a formulaI have a spread sheet with very large numbers on it, normally when the cell
shows up as a formula i just make the cell bigger and it fixes it. This time
it won't, i've tried formating it as text, and it works but i have to double
click each cell to change it to a number. There are almost 1400 cells, there
has to be an easier way!!
Please help!
|
|
|