Posts by johno359

Many thanks Roy. I'll take a look at this. I appreciate your feedback.

Kind regards,

Lee

Hi Roy,

Sorry for my late reply but I had to confirm the answer. Yes, it's definitely a 'com' add-in. I have permission from IT to temporarily disable it while I run my VBA code. Do you have any idea how this can be done please?

Thanks again for your help.

Regards,

Lee

Hi Roy,

It is an add-in for Outlook. Here are the details of it: Homepage (mailmanager.com)

I am trying to figure out how to temporarily disable it whilst running some VBA code and it's proving very challenging to figure out!

Thanks for your reply and any help you can provide on this matter.

Kind regards,

Lee

Hello,

I have recently had the Mail Manager add-in installed in Outlook. I have some Excel VBA code that automatically sends emails but I want to be able to either over-ride or temporarily disable the Mail Manager add-in / function. Does anyone know how to do this please?

Thanks in advance for any help with this.

Kind regards,

Lee

Re: Ignore If Worksheet Does Not Exist

It works great.

Many thanks for your help

Re: Ignore If Worksheet Does Not Exist

Here is the code:

Dim a as Integer


For a = 1 to 20
     If Sheets("Sheet" & a) does not exist then   'I need to make this line work!
        
          MsgBox "Sheet" & a & " does not exist"     
    Else
          MsgBox "Sheet" & a & " does exist"


    End if
Next a

Hi

I am struggling with coming up with a way of writing a line of code in VBA that ignores (or skips) a bit of code everytime a worksheet does not exist.

Does anyone have any solutions to this?

Johno

Re: Referencing A Vb Component By Name

Thanks Bob[hr]*[/hr] Auto Merged Post Until 24 Hrs Passes;[dl]*[/dl]Arh,......how about telling it not to delete a userfom called "Class"??

Re: Referencing A Vb Component By Name

In that case, I need the code to skip deleting the module called "WindMod"

Any ideas?

Hi

The following code removes all macros from my workbook:

On Error Resume Next
With ActiveWorkbook.VBProject
        For X = .VBComponents.Count To 1 Step -1
            .VBComponents.Remove .VBComponents(X)
        Next X
        For X = .VBComponents.Count To 1 Step -1
            .VBComponents(X).CodeModule.DeleteLines _
            1, .VBComponents(X).CodeModule.CountOfLines
        Next X
End With
On Error GoTo 0

However, I have a macro called Wind() which I do not want removed. The code above references the VB component by a number, X, but this value may vary for Wind() . Therefore, is it possible to reference the VB component by name, and if that name is equal to Wind() , then the VB component will not be removed?

Many thanks if anyone can help,

Johno

Re: Disabling Worksheet_change

Thanks

I've tried this but my worksheet_change function is still enabled...?

Strange it is

Hello

I am using the Worksheet_Change function behind a worksheet that executes some code every time a change is made on the worksheet.

ie.

Private Sub Worksheet_Change(ByVal Target As Range)
End sub

Is it possible to disable this function while running another macro? Therefore, when I enable Screen.Updating, the Worksheet_Change function will not be triggered.

Many thanks to anyone who can help.

Johno

Re: Select A Range Of Rows And Copy

Thanks Bill:duck:

Hi,

The following code inserts a row below the selected row, and copies the formula of the row above into it.

Dim Rw as Integer
Rw = ActiveCell.Row
Selection.Insert Shift:=xlDown
Rows("" & Rw - 1 & ":" & Rw - 1 & "").Copy
Rows("" & Rw & ":" & Rw & "").Paste

However, I need to alter this to work for inserting more than one row at a time.
ie. the user selects 'x' number of rows and 'x' rows are inserted below (in the same way 'Insert Row' works in Excel) and the row above the selection is copied down.

I can't figure out how to do it. Is this possible?

Cheers,
Johno

Re: Restrict Option To 1 Choice

Thanks for your help

I have one question....what code do you use to tell an option to be selected?

Thanks

Johno

Re: Multiple Options Per Item In A Listbox

Thanks Andy

The number of items in the list varies so is it possible to actually use VBA to write a frame inside the list box?

Would a frame be needed for each set of three options?

Thanks

Johno

Hi

I am using a listbox in a userform that has an option button per item, that can be selected/deselected.

However, I need to create a listbox that displays three options per item. The user can then select from one of the three options per item on the list. Note that each item can only have one option selected.

Is this possible using userforms?

Many thanks,

Johno

Re: Double Clicking On Cells Slowing Down Work

Hi

Target.Column has same effect. There is a lot of formula on the worksheet, but not that much. If its normal, then i guess I'll just grit my teeth and bear it.

Cheers
Johno

Hi

The following code is used to allow the user to double click on any cell in column B or D of that worksheet and peform a routine (in this case, a simple message box appears).

'To enable to user to double click on cell to select equipment
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim Check As Integer
  
        Check = ActiveCell.Column
        
        If Check = 2 or Check = 4 Then
                MsgBox "Found Column"
                Exit Sub
        End If
 
End Sub

My problem is that it slows down any work on that worksheet. If I select a cell or anything, the bottom left hand side of the screen says "Calculating cells" and counts from 0 to 100%.

Any idea of how I can avoid this? It is very annoying!

Cheers
Johno

Re: Removal Of A Word From A Cell

Fantastic. Thanks mate