Compile error invalid use of property

I have the Student class in VBA (Excel) implemented as follows Option Explicit Private name_ As String Private surname_ As String Private marks_ As New Collection Public Property Get getMean() As

I have the Student class in VBA (Excel) implemented as follows

Option Explicit

Private name_ As String
Private surname_ As String
Private marks_ As New Collection


Public Property Get getMean() As Single

    Dim sum As Double
    Dim mark As Double
    Dim count As Integer

    For Each mark In marks_
        sum = sum + mark
        count = count + 1
    Next mark

    getMean = sum / count

End Property

Public Property Let setName(name As String)
    name_ = name
End Property

Public Property Get getName() As String
    getName = name_
End Property

Public Property Let setSurname(surname As String)
    surname_ = surname
End Property

Public Property Get getSurname() As String
    getSurname = surname_
End Property

Then I have a main sub where I write:

Dim stud1 As New Student

stud1.setName "Andy"

I got a compile error on stud1.setName "Andy" : Invalid use of property.
I don’t understand why. Any Idea, please?

Community's user avatar

asked Feb 1, 2014 at 20:06

mStudent's user avatar

2

Since it’s a property (not method) you should use = to apply a value:

Dim stud1 As New Student

stud1.setName = "Andy"

BTW, for simplicity, you can use the same name for get and set properties:

Public Property Let Name(name As String)
    name_ = name
End Property

Public Property Get Name() As String
    Name = name_
End Property

and then use them as follows:

Dim stud1 As New Student
'set name
stud1.Name = "Andy"
'get name
MsgBox stud1.Name

AAA's user avatar

AAA

3,4501 gold badge14 silver badges31 bronze badges

answered Feb 1, 2014 at 20:07

Dmitry Pavliv's user avatar

Dmitry PavlivDmitry Pavliv

35.1k13 gold badges79 silver badges80 bronze badges

3

  • Remove From My Forums
  • Question

  • I’m trying to pass an array into a custom class for storage and further use within that object. The class object has the following definition:

       ' Class Name: MBRMCurves
        Implements ICurves
    
        Private m_lInterpDates() As Long
    
        Public Property Get InterpDates() As Long()
        
            InterpDates = m_lInterpDates
        
        End Property
        
        Public Property Let InterpDates(lInterpDates() As Long)
        
            m_lInterpDates = lInterpDates
        
        End Property

    The module that calls this code looks like this:

       Dim objResult     As New MBRMCurves
                
            'Store the forward prices
            Dim fx_fwd()      As Double
            
            'Store the interpolation dates
            Dim int_dates()   As Long
            
            'initially there are no people
            Dim NumberTenors  As Integer
            NumberTenors = 0
        
            Dim cell          As range
        
            ' Create ranges of Dates
            Dim range     As range
            Dim range_topcell As range
        
            ' TODO Pri1 Create the Curves Obj
            With Worksheets("test")
        
                ' Populate the dates of the FWD rates.
                Set range_topcell = .range("B5")
        Debug.Print range_topcell.Value
                Set range = .range(range_topcell, range_topcell.End(xlDown))
        Debug.Print range.Count
        
                ' Add more columns to the FWD array
                ReDim fx_fwd(0 To range.Count - 1, 0 To 3)
                ReDim int_dates(0 To range.Count - 1)
                
                ' Set the counter
                NumberTenors = 0
                
                ' Populate the dates of the FWD rates into the first column of the dates array.
                For Each cell In range
                    NumberTenors = NumberTenors + 1
                    int_dates(NumberTenors - 1) = cell.Value
                Next cell
        
                ' Add interpolation dates to Curves object
                objResult.InterpDates int_dates

    The last line in the above code is giving me the compile error:  Invalid use of property.

    I believe that the syntax of me Let function is correct, but I might be missing a more subtly nuanced oversight.

    Can anyone see what I’m doing wrong? I’m working with Excel 2003 and VBA 6.5 on Windows XP.

    Any suggestions would be greatly appreciated.

    Thanks,

    Christos

    • Edited by

      Monday, December 10, 2012 2:09 PM

Answers

  • Just to answer my own question for future reference:

    «a property is not a method call and you need to set it equal to your array:

    objResult.InterpDates = int_dates

    There still might be an issue with the array your passing in but this is a first step.»

    Answer from Phillip A. Barnes.

    http://stackoverflow.com/questions/13802262/how-to-pass-a-dynamic-array-into-a-vba-object-compile-error-invalid-use-of-pro

    • Marked as answer by
      许阳(无锡)
      Tuesday, December 11, 2012 1:06 AM

  • Remove From My Forums
  • Вопрос

  • I am not a skilled code writer. Please respond as you would to a 10 year old with your explanations. 

    I created a user form in VBA through Office 365 Word 2016. The form is an audit questionnaire with only text boxes and combo option boxes. The goal is to have the form auto generate an audit report. 

    I followed instructions and copied the code format from a website. When I go to debug>compile normal- I get an error message that says «Compile error: Invalid use of property». This is on one line of code for a textbox. txtocip Value =
    «a»  The codes for the other text boxes are set the same way but do not show this error. 

    How do I correct this? I do not fully grasp the concept of properties and how it relates to coding. 

  • #2

Try

Code:

ActiveCell.FormulaR1C1 "=IFERROR(VLOOKUP(RC[-1], '[File]Sheet'!$A:$E,5,0,"""")"

  • #3

I think you’d need:

Code:

ActiveCell.FormulaR1C1 "=IFERROR(VLOOKUP(RC[-1], '[File]Sheet'!C1:C5,5,0),"""")"

But note that the ‘[File]Sheet’ does need to be a valid file name and sheet name which I suspect they are not at the moment.

  • #4

Thanks for the replies. I changed the file name, so I have a local table that is named. However my problem still exists.

The error is occuring at formular1c1

Is there another way to get the value in the cell?

Thanks for the help

  • #5

You also need an = between FormulaR1C1 and the start of the string.

ie

Rich (BB code):

ActiveCell.FormulaR1C1 = "=IFERROR(VLOOKUP(RC[-1], '[File]Sheet'!$A:$E,5,0,"""")"

Adjust [File]Sheet accordingly.

  • #6

I am getting a ‘Compile error — Invalid use of property’ while using the following macro trigger: —

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = «$Q$30» Then
If Target.Value > 1 Then
Sort
End If
End If
End Sub

Can anyone help me debug this?

  • #7

What is Sort? If it is a subroutine you should rename it as Sort is a VBA keyword.

  • #8

What is Sort? If it is a subroutine you should rename it as Sort is a VBA keyword.

Sort is the name of a Macro which sorts a table in the active worksheet where I want to trigger this macro

  • #9

Try changing its name to MySort then use

Code:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$Q$30" Then
    If Target.Value > 1 Then
        Call MySort
    End If
End If
End Sub

  • #10

Try changing its name to MySort then use

Code:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$Q$30" Then
    If Target.Value > 1 Then
        Call MySort
    End If
End If
End Sub

The above changes stop the error to appear, however the code doesn’t trigger the macro anymore. Can’t understand why :( . Could you help if I could mail you the spreadsheet. Please reply. Thanks!

Last edited: Apr 22, 2012

  1. 10-08-2015, 12:31 PM


    #1

    tvwright is offline


    Registered User


    VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Hi all,

    I’m trying to create a code for cell G20 (see attached workbook), which represents a value for «intercept». This «intercept» value changes, depending on multiple conditions, which is why I need to write a complex nesting IF function with multiple AND conditions to get the correct value. Currently, I have only six nesting IFs, but eventually I will need 963. I am just testing this out to see if I can get six going and then I will worry about the remaining 957 lol.

    So here is my code to accomplish this:

    Sub IfThenNesting()

    If C3 = «CCI» And C5 = «Case-Shiller National Home Price Index» And C9 = 5 Then Range(«I4»).Value
    End If
    ElseIf C3 = «CCI» And C5 = «National Unemployment Rate» And C9 = 0 Then Range(«I5»).Value
    End If
    ElseIf C3 = «CCI» And C5 = «S&P 500 Stock Prices» And C9 = 0 Then Range(«I6»).Value
    End If
    ElseIf C3 = «CCI» And C5 = «# of House Units Starts» And C9 = 3 Then Range(«I7»).Value
    End If
    ElseIf C3 = «National Unemployment Rate» And C5 = «S&P 500 Stock Prices» And C9 = 0 Then Range(«I8»).Value
    End If
    ElseIf C3 = «S&P 500 Stock Prices» And C5 = «Nordstrom Stock Price» And C9 = 0 Then Range(«I9»).Value
    End If
    End Sub

    and my workbook is attached here:
    VBA IF test.xlsx

    I want to do a nesting IF statement with multiple conditions. It all makes sense if you look at the worksheet. I want the calculation of the IF statement to be entered into cell G20.

    Any help is GREATLY appreciated on getting me started. THANK YOU.

    Last edited by tvwright; 10-08-2015 at 12:49 PM.


  2. 10-08-2015, 12:34 PM


    #2

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Get rid of every «End If» and «ElseIf» — you really are not using nesting at all.

    But your code has other problems: if your C3, C5, and C9 are cells , then use

    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «Case-Shiller National Home Price Index» And Range(«C9»).Value = 5 Then Range(«G19»).Value = Range(«I4»).Value

    But if you expect 900+ nested ifs then you really should be doing something different.

    Last edited by Bernie Deitrick; 10-08-2015 at 12:41 PM.

    Bernie Deitrick
    Excel MVP 2000-2010


  3. 10-08-2015, 12:42 PM


    #3

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    Get rid of every «End If» and «ElseIf»

    But your code has other problems: if your C3, C5, and C9 are cells , then use

    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «Case-Shiller National Home Price Index» And Range(«C9»).Value = 5 Then Range(«I4»).Value = «Something»

    OK Great, did that. Still get the same «Compile Error: Invalid Use of Property» on the very first line of code.

    The error is highlighting this line of code:

    FirstLine.png

    Also, how do I get it so that it enters this IF formula into cell G20? Thank you!


  4. 10-08-2015, 12:45 PM


    #4

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    Get rid of every «End If» and «ElseIf» — you really are not using nesting at all.

    But your code has other problems: if your C3, C5, and C9 are cells , then use

    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «Case-Shiller National Home Price Index» And Range(«C9»).Value = 5 Then Range(«G19»).Value = Range(«I4»).Value

    But if you expect 900+ nested ifs then you really should be doing something different.

    OK — I still get the same error with the first line even after making those ‘Range(«C9»).Value’ updates for all of my cell values. what are other options that I should be doing other than nesting IF statements? Keep in mind, I am not a VBA coder so I was trying to keep it simple even though it is very repetitive.

    My code now currently reads like this and still get the error on first line:

    Sub Test()
    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «Case-Shiller National Home Price Index» And Range(«C9»).Value = 5 Then Range(«I4»).Value

    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «National Unemployment Rate» And Range(«C9»).Value = 0 Then Range(«I5»).Value

    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «S&P 500 Stock Prices» And Range(«C9»).Value = 0 Then Range(«I6»).Value

    If Range(«C3»).Value = «CCI» And Range(«C5»).Value = «# of House Units Starts» And Range(«C9»).Value = 3 Then Range(«I7»).Value

    If Range(«C3»).Value = «National Unemployment Rate» And C5 = «S&P 500 Stock Prices» And Range(«C9»).Value = 0 Then Range(«I8»).Value

    If Range(«C3»).Value = «S&P 500 Stock Prices» And C5 = «Nordstrom Stock Price» And Range(«C9»).Value = 0 Then Range(«I9»).Value

    End Sub

    Last edited by tvwright; 10-08-2015 at 12:54 PM.


  5. 10-08-2015, 01:01 PM


    #5

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    First, you are putting your code into the wrong place. Delete the code that you have, then double-click the Module1 object in your project, and paste this into the window that appears. You were getting the error on the first line because the sub was not compiling, because you were using

    …. Then Range(«I4»).Value

    without assigning a value to I4 or using I4’s value in any way.


  6. 10-08-2015, 01:40 PM


    #6

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    First, you are putting your code into the wrong place. Delete the code that you have, then double-click the Module1 object in your project, and paste this into the window that appears. You were getting the error on the first line because the sub was not compiling, because you were using

    …. Then Range(«I4»).Value

    without assigning a value to I4 or using I4’s value in any way.

    Thank you. Copying and pasting the above code worked!!! WOW. I am very thankful for your help and it makes sense. Except I made a typo in my first post and said G19 when I meant G20 so I will change it. You’re awesome! THANK YOU.

    Except now I have to press «run» anytime I want G20 to update. How do I have it automatically run anytime someone changes any of the criteria in cells C3, C5, and or C9?

    Last edited by tvwright; 10-08-2015 at 01:43 PM.


  7. 10-08-2015, 01:45 PM


    #7

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Great! Get yourself a good book — I always recommend John Walkenbach’s «Excel XXXX Power Programming With VBA» series — available for older versions used (and cheaper), but the basics still apply, so it is a good start:

    http://www.amazon.com/gp/offer-listi…condition=used


  8. 10-08-2015, 01:49 PM


    #8

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    Great! Get yourself a good book — I always recommend John Walkenbach’s «Excel XXXX Power Programming With VBA» series — available for older versions used (and cheaper), but the basics still apply, so it is a good start:

    http://www.amazon.com/gp/offer-listi…condition=used

    Thank you. I will definitely get a book. I added an «edit» after I already hit submit… one more quick question: how do I get the code to automatically run anytime the conditions in cells C3, C5 and/or C9 are changed?


  9. 10-08-2015, 02:00 PM


    #9

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    1) Copy this code.
    2) Right-Click the sheet tab of interest.
    3) Select «View Code»
    4) Paste the code into the window that appears.
    5) Save the file as a macro-enabled .xlsm file.
    6) Make changes as needed to the macro name


  10. 10-08-2015, 02:15 PM


    #10

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)


  11. 10-14-2015, 01:57 PM


    #11

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    1) Copy this code.
    2) Right-Click the sheet tab of interest.
    3) Select «View Code»
    4) Paste the code into the window that appears.
    5) Save the file as a macro-enabled .xlsm file.
    6) Make changes as needed to the macro name

    Hi Bernie,

    I ordered that book from Amazon and it hasn’t come yet. But I’m excited to be getting it next week. So I have another question regarding this project for you since you have been so great at helping! Attached is my updated workbook. Everything is working correctly and flawlessly, thanks to your help.

    Right now all of my data and calculations are on the same sheet, but I would like to move the data to sheet 2, and have my calcuations on sheet 1 so I don’t have to be looking at all the data on the form. Here is the workbook for reference:

    La la.xlsm

    Here is my code for reference:

    In Module1

    In Sheet 2

    So all of the above code works perfectly. Except now I have all the data on sheet named «Calculation» in the same position except on sheet named «data». I want the VBA code to use the cells on worksheet named «Data» instead of the current cell ranges it is using on worksheet named «calculation.

    I tried changing all of the above to

    but this did not work? Can you send me in the right direction to how to keep the code working properly by changing the data to another sheet?

    Thank you! <3

    Last edited by tvwright; 10-14-2015 at 02:03 PM.


  12. 10-14-2015, 02:50 PM


    #12

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    You don’t have a worksheet name «data» in the posted file.

    So try this. Change

    to


  13. 10-14-2015, 02:58 PM


    #13

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    I Am so sorry. I updated the worksheet names and didn’t save it before I sent you the file. You got the older version. Here is the new version. Will your code still work? I will go ahead and try it in a minute.

    La la.xlsm


  14. 10-14-2015, 03:58 PM


    #14

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    You should just use a formula in those three cells:

    B28:

    =SUMPRODUCT((F4:F15=C3)*(G4:G15=C5)*I4:I15)

    B29:

    =SUMPRODUCT((F4:F15=C3)*(G4:G15=C5)*H4:H15)

    C19

    =INDEX(J:J,SUMPRODUCT((F4:F15=C3)*(G4:G15=C5)*ROW(H4:H15)))

    When you have a larger table just change the 15s to the a number higher than the number or rows in your table.

    In code, you would use:

    Last edited by Bernie Deitrick; 10-14-2015 at 04:03 PM.


  15. 10-14-2015, 04:24 PM


    #15

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    You don’t have a worksheet name «data» in the posted file.

    So try this. Change

    to

    Hi Bernie,

    Thank you. It says I have a Run Time Error when I enter that code. I replaced all cell values to have the sheet reference preceding it. Here is my code now after following your update:

    and I get «Run-Time error ‘424’ Object Required» pop up. It highlights my sixth line of code, see picture below:

    delete.png


  16. 10-14-2015, 04:25 PM


    #16

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Also here is my workbook now. It has no data in the calculation tab.

    La la.xlsx

    Any idea on why I’m getting that error? Thank you!


  17. 10-14-2015, 04:34 PM


    #17

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    OK I got it to work. THe issue was I did not have a T in the «shtd» or «shtc» in this part:

    Corrected version:

    it used to be..
    Incorrect version:

    I added the T, and it works when I manually «run» the code, but it is no longer automatically updating. The code you gave me to get it to automatically update is no longer applicable because I changed the sheet.How do I get it to run automatically again? I copied the code into the «data» sheet’s code dialogue, but this does not work.

    EDIT: OK so weirdly enough, i closed out of excel and re-opened it and now it all works automatically without any problems. this is so confusing! Thank you again for all of your help.

    Last edited by tvwright; 10-14-2015 at 06:58 PM.


  18. 10-15-2015, 10:31 AM


    #18

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Great — glad to hear you got it to work, despite my poor typing skills


  19. 10-20-2015, 10:34 AM


    #19

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    1) Copy this code.
    2) Right-Click the sheet tab of interest.
    3) Select «View Code»
    4) Paste the code into the window that appears.
    5) Save the file as a macro-enabled .xlsm file.
    6) Make changes as needed to the macro name

    Hi Bernie,

    I have a few more macros that I would like to automatically run when those same cells are changed. The above code currently only works to run my first macro called «Test». I have 5 additional macros now that I would also like to run in the same way, named «Test1» «Test2» «Test3» «Test4» and «Test5» without the quotation marks. How do I edit your above code to get them to run in the same way as my first macro called «Test»?

    I attempted to change the code to this, but it did not work:

    How do you advise?

    Also I got the book you recommended and have already read Part 1 — it was just the introductory stuff. The next part is more advanced, and I’m very excited to read it tonight!


  20. 10-20-2015, 12:16 PM


    #20

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)


  21. 10-20-2015, 12:54 PM


    #21

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    Thanks, but when I do that it triggers a window with a drop down menu prompting me to select which single macro of the 11 I would like to run. See image below:

    MacroList.png

    I would like to select ALL macros and run them at the same time. I had to make 11 different macros, because I kept getting an error that the procedure was «too long» so I had to divide the one long procedure into multiple procedures. Do you have any suggestions?

    Thank you so much!


  22. 10-20-2015, 03:50 PM


    #22

    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Post your workbook.

    Did you look at using the formula that I posted instead of macro code?


  23. 10-20-2015, 03:59 PM


    #23

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    Quote Originally Posted by Bernie Deitrick
    View Post

    Post your workbook.

    Did you look at using the formula that I posted instead of macro code?

    Sorry for the late reply Bernie, usually I get an email notification when you respond but this time I did not for some reason. I did not look at the formula you posted, no. Do you think I should do that still — here is my workbook:

    La la (Autosaved).xlsm

    Let me know! Thank you.

    EDIT:

    It appears that your formula method is working!!!!!!!!!!!!!!! WOW. THANK YOU~

    Last edited by tvwright; 10-20-2015 at 04:33 PM.


  24. 10-20-2015, 05:00 PM


    #24

    tvwright is offline


    Registered User


    Re: VBA Noob, «Compile Error: Invalid Use of Property» On First line of Code (great..)

    If you’re interested, here is the final worksheet (for now… )

    La la Final.xlsm

    Last edited by tvwright; 10-20-2015 at 05:22 PM.


  • Home
  • VBForums
  • Visual Basic
  • Visual Basic 6 and Earlier
  • [RESOLVED] Compile error: Invalid use of property

  1. Jul 9th, 2010, 06:46 AM


    #1

    Arispan is offline

    Thread Starter


    Lively Member

    Arispan's Avatar


    Resolved [RESOLVED] Compile error: Invalid use of property

    Hello everyone,

    I’m making a big project (my biggest project) but I get a «Compile error: Invalid use of property» message.

    Here’s my code:

    vb Code:

    1. Private CForm As Form

    2. Public Sub Initialize(Child As Form)

    3. CForm = Child 'This line gives the error

    4. End Sub

    When I call my «Initialize» sub from another form, I get this error.
    Can someone help me ?

    Last edited by Arispan; Jul 9th, 2010 at 06:51 AM.


  2. Jul 9th, 2010, 06:50 AM


    #2

    Re: Compile error: Invalid use of property


  3. Jul 9th, 2010, 06:55 AM


    #3

    Arispan is offline

    Thread Starter


    Lively Member

    Arispan's Avatar


    Re: Compile error: Invalid use of property

    Thanks baja_yu! Now everything works fine !

    P.S. I think my thread just broke a record («the fastest solved thread in vforums»).

    Last edited by Arispan; Jul 9th, 2010 at 08:23 AM.


  • Home
  • VBForums
  • Visual Basic
  • Visual Basic 6 and Earlier
  • [RESOLVED] Compile error: Invalid use of property

Tags for this Thread


Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
  • BB code is On
  • Smilies are On
  • [IMG] code is On
  • [VIDEO] code is On
  • HTML code is Off

Forum Rules


Click Here to Expand Forum to Full Width

analyst

437 / 144 / 9

Регистрация: 12.01.2009

Сообщений: 678

Записей в блоге: 1

1

12.02.2010, 16:42. Показов 11625. Ответов 2

Метки нет (Все метки)


Всем привет! При использовании свойства path возникает ошибка:
Compile error: Invalid use of property

Visual Basic
1
2
3
Sub fen()
ThisWorkbook.Path
End Sub

Пример использования данной конструкции нашёл здесь:

В чем может быть ошибка (кроме отсутствия у меня мозгов)?



0



EducatedFool

0 / 0 / 0

Регистрация: 28.09.2009

Сообщений: 88

12.02.2010, 16:55

2

При использовании свойства path возникает ошибка

Что-то в вашем коде я не вижу использования этого свойства…

Использовать его надо хоть как-то, а то VBA получает значение этого свойства, а что с ним дальше делать — не знает…

Visual Basic
1
2
3
4
5
Sub fen()
    x = ThisWorkbook.Path
    'или
    MsgBox ThisWorkbook.Path
End Sub



0



437 / 144 / 9

Регистрация: 12.01.2009

Сообщений: 678

Записей в блоге: 1

12.02.2010, 16:59

 [ТС]

3

Цитата
Сообщение от EducatedFool
Посмотреть сообщение

Что-то в вашем коде я не вижу использования этого свойства…

Использовать его надо хоть как-то, а то VBA получает значение этого свойства, а что с ним дальше делать — не знает…


Спасибо!) Пора спать)



0



Anyone know what’s wrong with the code here? Thanks in advance!

    Sub Clear_data()* Getting an error here
    
    Dim rng1 As Variant 'this is to save range where the FX rates will paste over
    Dim rng2 As Variant 'this is to save range of FX rates data
    Dim rng3 As Variant 'this is to save range of NAV and CB data
    Dim rng4 As Variant
    
    Set rng2 = Sheets("Rate").Range("b3:g28")
    Set rng1 = Sheets("Rate").Range("I3:n28")
    Set rng3 = Sheets("transfer").Range("C11:G22")
    Set rng4 = Sheets("REC").Range("K9:O20")
    
        Application.Goto rng2 'copies over the prior's FX rate over for  reconciliation
        Selection.Copy
        Application.Goto rng1
        Selection.pastespecial Paste:=xlPasteValues
        Selection.pastespecial Paste:=xlPasteFormats
        
        Application.Goto rng3
        Selection.Copy
        Application.Goto rng4
        Selection.pastespecial Paste: xlPasteValues
        Application.Goto Sheets("Transfer").Range("A1")

End Sub

Понравилась статья? Поделить с друзьями:
  • Compile error invalid outside procedure excel
  • Compile error invalid or unqualified reference vba
  • Compile error invalid next control variable reference
  • Compile error invalid character
  • Compile error in hidden module word