Posts by Imbuzi

Hi All

I am a bit stuck on this one. I have a vba script that completes a filesearch and I would like to add a hyperlink to the files that are found in the search. I have managed to produce a hyperlink by inserting a formula via vba. This is not a very efficient way of producing a hyperlink. Is there another way that I could produce hyperlink.

Graeme

Hi Jack

I use comboboxes alot at work. the approach that I take is to have a parameter sheet that has all of the details that I need for the combobox.

This approach is quite good if you need users to update the lists themselves.

Have a look at the attached file this might help.

Graeme

Fluppe

try this link this may solve your problem.

http://www.straxx.com/excel/password.html

Graeme

CC

this code might be of use to you. I have this saved in my personal.xls and it is attached to a button on one of my toolbars.

Sub UpdateFooter()
ActiveSheet.PageSetup.LeftFooter = _
ActiveWorkbook.FullName
End Sub

Graeme:)

Bill,

Have tried to adjust the magins in the print preview.

Graeme

Susheng,

from the data that you copied into excel it looks like your data is coming from a mainframe application. if this is the case then you should be able to get at the data using SQL. The output could then be imported into excel.
:yes:

Hi Jhenderson,

I'm not sure why you are getting a circular reference but this is how i would tackle a totals page.
add this to your totals sheet
=SUM(Sheet2:Sheet4!A9)

then change sheet names to the first and last sheet name of the sheets that you want to total, also change the cell reference accordingly

Hope this helps

T

have you tried to compacting your database? This should help speed up your dog.

You could also try adding more primary keys this could also help speed things up

:eureka:

Bruce,

They way in wich I am using this code is to replicate the paste values function.

The code works fine in XP when you have already copied a range.

I should have mentioned that the error occurs in the Paste Values Sub.

Hi

I have written the code below to add the paste values function to the cell command bars. The only problem is that it works in Excel XP but when I try using it in '97 I get a Range object runtime error. Any suggestions???

Sub AddItemToShortcut()

Set NewItem = CommandBars("cell").Controls.Add
With NewItem
.Caption = "Paste Values"
.FaceId = 370
.OnAction = "PasteValue"
.BeginGroup = True
End With
End Sub

Sub RemoveItem()
On Error Resume Next
CommandBars("cell").Controls("Paste Values").Delete
End Sub

Sub PasteValue()
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub