ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   adding a toolbar function to an excel cell (https://www.excelbanter.com/excel-worksheet-functions/253045-adding-toolbar-function-excel-cell.html)

Colin Hayes

adding a toolbar function to an excel cell
 


Hi

I'm trying to run a toolbar function (Refresh All) , from cell M20.

I'd rather do this than have it placed on the toolbar.

Is it possible to do this?

Grateful for any advice.



Best Wishes

FSt1

adding a toolbar function to an excel cell
 
hi
you can't put the icon refresh all in the cell but you could use the before
double click event on the cell to run a macro.
right click the sheet that contains the cell you want to activate the refresh.
click view code and paste this macro in the code window.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

careful. the first line wrapped.

post back if problems.

Regards
FSt1

"Colin Hayes" wrote:



Hi

I'm trying to run a toolbar function (Refresh All) , from cell M20.

I'd rather do this than have it placed on the toolbar.

Is it possible to do this?

Grateful for any advice.



Best Wishes
.


Colin Hayes

adding a toolbar function to an excel cell
 

Hi

OK thanks for you help with this.

I'm afraid I can't unscramble the code. I inserted it into the sheet ,
but it gives error after error when I try to apply it.

It seems to have lost all formatting in the email , so I don't know
where to split the lines , unfortunately.

Best wishes



In article , FSt1
writes
hi
you can't put the icon refresh all in the cell but you could use the before
double click event on the cell to run a macro.
right click the sheet that contains the cell you want to activate the refresh.
click view code and paste this macro in the code window.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

careful. the first line wrapped.

post back if problems.

Regards
FSt1

"Colin Hayes" wrote:



Hi

I'm trying to run a toolbar function (Refresh All) , from cell M20.

I'd rather do this than have it placed on the toolbar.

Is it possible to do this?

Grateful for any advice.



Best Wishes
.



Gord Dibben

adding a toolbar function to an excel cell
 
Private Sub Worksheet_BeforeDoubleClick(ByVal _
Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

The <space_ after ByVal is known as a "continuation character" and allows
long lines of code to be be wrapped.


Gord Dibben MS Excel MVP


On Mon, 11 Jan 2010 23:50:01 +0000, Colin Hayes
wrote:


Hi

OK thanks for you help with this.

I'm afraid I can't unscramble the code. I inserted it into the sheet ,
but it gives error after error when I try to apply it.

It seems to have lost all formatting in the email , so I don't know
where to split the lines , unfortunately.

Best wishes



In article , FSt1
writes
hi
you can't put the icon refresh all in the cell but you could use the before
double click event on the cell to run a macro.
right click the sheet that contains the cell you want to activate the refresh.
click view code and paste this macro in the code window.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

careful. the first line wrapped.

post back if problems.

Regards
FSt1

"Colin Hayes" wrote:



Hi

I'm trying to run a toolbar function (Refresh All) , from cell M20.

I'd rather do this than have it placed on the toolbar.

Is it possible to do this?

Grateful for any advice.



Best Wishes
.



FSt1

adding a toolbar function to an excel cell
 
thanks gord. i did warn about that but you got back before i did.

regards
FSt1

"Gord Dibben" wrote:

Private Sub Worksheet_BeforeDoubleClick(ByVal _
Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

The <space_ after ByVal is known as a "continuation character" and allows
long lines of code to be be wrapped.


Gord Dibben MS Excel MVP


On Mon, 11 Jan 2010 23:50:01 +0000, Colin Hayes
wrote:


Hi

OK thanks for you help with this.

I'm afraid I can't unscramble the code. I inserted it into the sheet ,
but it gives error after error when I try to apply it.

It seems to have lost all formatting in the email , so I don't know
where to split the lines , unfortunately.

Best wishes



In article , FSt1
writes
hi
you can't put the icon refresh all in the cell but you could use the before
double click event on the cell to run a macro.
right click the sheet that contains the cell you want to activate the refresh.
click view code and paste this macro in the code window.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

careful. the first line wrapped.

post back if problems.

Regards
FSt1

"Colin Hayes" wrote:



Hi

I'm trying to run a toolbar function (Refresh All) , from cell M20.

I'd rather do this than have it placed on the toolbar.

Is it possible to do this?

Grateful for any advice.



Best Wishes
.


.


Gord Dibben

adding a toolbar function to an excel cell
 
I noticed, but who RTFM<g


Gord

On Mon, 11 Jan 2010 20:52:01 -0800, FSt1
wrote:

thanks gord. i did warn about that but you got back before i did.

regards
FSt1

"Gord Dibben" wrote:

Private Sub Worksheet_BeforeDoubleClick(ByVal _
Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

The <space_ after ByVal is known as a "continuation character" and allows
long lines of code to be be wrapped.


Gord Dibben MS Excel MVP


On Mon, 11 Jan 2010 23:50:01 +0000, Colin Hayes
wrote:


Hi

OK thanks for you help with this.

I'm afraid I can't unscramble the code. I inserted it into the sheet ,
but it gives error after error when I try to apply it.

It seems to have lost all formatting in the email , so I don't know
where to split the lines , unfortunately.

Best wishes



In article , FSt1
writes
hi
you can't put the icon refresh all in the cell but you could use the before
double click event on the cell to run a macro.
right click the sheet that contains the cell you want to activate the refresh.
click view code and paste this macro in the code window.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Not Intersect(Target, Range("M20")) Is Nothing Then
ActiveWorkbook.RefreshAll
Else
Exit Sub
End If
End Sub

careful. the first line wrapped.

post back if problems.

Regards
FSt1

"Colin Hayes" wrote:



Hi

I'm trying to run a toolbar function (Refresh All) , from cell M20.

I'd rather do this than have it placed on the toolbar.

Is it possible to do this?

Grateful for any advice.



Best Wishes
.


.




All times are GMT +1. The time now is 10:23 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com