+ Reply to Thread
Results 1 to 11 of 11

How can i find the macro

Hybrid View

Thomas_G How can i find the macro 12-04-2007, 05:36 PM
VBA Noob See if link helps ... 12-04-2007, 05:41 PM
Thomas_G It didnt help. i dont have... 12-04-2007, 05:55 PM
VBA Noob See if this link helps ... 12-04-2007, 05:58 PM
Thomas_G Hej Not much of this makes... 12-04-2007, 06:15 PM
VBA Noob Please read forum rules below... 12-04-2007, 06:16 PM
VBA Noob Thanks for wrapping code ... 12-04-2007, 06:25 PM
Thomas_G you got mail :) 12-04-2007, 06:30 PM
VBA Noob Right Click sheet tab called ... 12-04-2007, 06:46 PM
Thomas_G Oh man thats lovely. thanks a... 12-04-2007, 06:51 PM
VBA Noob Your welcome VBA Noob 12-04-2007, 06:55 PM
  1. #1
    Registered User
    Join Date
    12-04-2007
    Posts
    5
    Hej

    Not much of this makes any sence to me. Mostly becourse my english is lagging a bit, and second that im not very good at programming anything :p

    i guess whe it should do is this ?

    Deleting All VBA Code In A Project

    This code will delete ALL VBA code in a VBProject.
        Sub DeleteAllVBACode()
            Dim VBProj As VBIDE.VBProject
            Dim VBComp As VBIDE.VBComponent
            Dim CodeMod As VBIDE.CodeModule
            
            Set VBProj = ActiveWorkbook.VBProject
            
            For Each VBComp In VBProj.VBComponents
                If VBComp.Type = vbext_ct_Document Then
                    Set CodeMod = VBComp.CodeModule
                    With CodeMod
                        .DeleteLines 1, .CountOfLines
                    End With
                Else
                    VBProj.VBComponents.Remove VBComp
                End If
            Next VBComp
        End Sub
    but where should i put it, and does it needs to be compiled or something like that ?

    I could upload the file to here if u maybe have time to take a look at it ?

    /Thomas
    Last edited by Thomas_G; 12-04-2007 at 06:19 PM.

  2. #2
    Forum Contributor VBA Noob's Avatar
    Join Date
    04-25-2006
    Location
    London, England
    MS-Off Ver
    xl03 & xl 07(Jan 09)
    Posts
    11,988
    Please read forum rules below and then wrap your code as per rule 5

    VBA Noob
    _________________________________________


    Credo Elvem ipsum etian vivere
    _________________________________________
    A message for cross posters

    Please remember to wrap code.

    Forum Rules

    Please add to your signature if you found this link helpful. Excel links !!!

  3. #3
    Forum Contributor VBA Noob's Avatar
    Join Date
    04-25-2006
    Location
    London, England
    MS-Off Ver
    xl03 & xl 07(Jan 09)
    Posts
    11,988
    Thanks for wrapping code

    If you like send me a private message with your e-mail address and I will reply so you can send me the file

    or post the file here and I'll take a look

    VBA Noob

  4. #4
    Registered User
    Join Date
    12-04-2007
    Posts
    5
    you got mail

  5. #5
    Forum Contributor VBA Noob's Avatar
    Join Date
    04-25-2006
    Location
    London, England
    MS-Off Ver
    xl03 & xl 07(Jan 09)
    Posts
    11,988
    Right Click sheet tab called
    Overblik
    and select view code and remove the line

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    End Sub
    then save workbook and reopen

    VBA Noob

  6. #6
    Registered User
    Join Date
    12-04-2007
    Posts
    5
    Oh man thats lovely. thanks a million.

    Now its time to wonder how it came there in the first place :p

    but again thanks alot

    /Thomas

  7. #7
    Forum Contributor VBA Noob's Avatar
    Join Date
    04-25-2006
    Location
    London, England
    MS-Off Ver
    xl03 & xl 07(Jan 09)
    Posts
    11,988
    Your welcome

    VBA Noob

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1