property

Hello everyone, I'd like to seek for everyone's assistance why am I getting this error message: "Could not set the list property. Invalid property value error" I have no problem with populating the listbox1 inside a form using the code below but whenever I try to modify the listbox, the said...

Hi all, I am a newbie in VBA and I need help with the dilemma I have. I have a listbox and a delete button in a frame with named range, lstRates,=OFFSET(ConKiloRates!$A$2,0,0,COUNTA(ConKiloRates!$A:$A) -1,11). My problem is when I delete the last item in the listbox. It displays Runtime...

Hoping someone can help with my issue below. I am trying to concatenate any codes in the "property codes" column based on the "part number" column. Sample data below. Basically I want a property code string that starts when there is any non-blank in column A and ends when the next non-blank in...

I have a form that gets data from a class but somehow when the nested sub that reads the data to the form gets terminated premature Private BA As BidApproval Private Sub UserForm_Initialize() Set BA = New BidApproval For Each c In Me.Controls If TypeName(c) = "ComboBox" Then...

Hi All, I have two sheets that I am working on ='Table Of Values'! and ='Report Template'!. In cell AE14 of the sheet ='Report Template'! I have a name of the city. I would like to match and list the related data of the column "Location Rates" that are in C9:C192 in ='Table Of Values'!. I also...

In the code below, why am I getting a Type mismatch error on this line? a = rect.AreaItem(l, w) Standard Module: Option Explicit Sub Start() Dim l As Double Dim w As Double Dim rect As New clsRectangle l = 10 w = 20 rect.Area = l * w...

Hi All, I have built one macro , which adds the code (write/add event automatically) to new sheet. code works fine up to mark. but since this particular stuff will be using by10-30 user so there is possibility someone can mess with code or not intentionally change the code. I'm looking to...

Standard module: Dim MyVar(1 To 10, 1 To 10) As MyClass Set MyVar(1 To 10, 1 To 10) = New MyClass MyVar(1, 1).Category = "Some category" MyVar(2, 1).Fruit = "Some fruit" MyClass: Private pCategory As Variant Private pFruit As Variant Public Property Get Category() As Variant...

Recently, I had a contract worker help me develop a scheduling spreadsheet. Overall the individual did a very nice job and exactly what I asked of him. Unfortunately, I missed 1 detail that I need to fix / upgrade.... The individual created a schedule for our manufacturing facility...

I understand that the text property for the Range object is a read only property. Does this mean that I can use this to paste a value in a cell though I can read a cell as text? Are there any good articles that explain what a read only property does in VBA as opposed to a read/write property...

I am attempting to add a custom document property to an excel file but am getting a "Invalid Procedure Call or Argument". I am following the same code instructions found in most forums. Can anyone tell me what I am doing wrong? [CODE][ActiveWorkbook.CustomDocumentProperties.Add Name:="Part...

I have been given a workbook (2016) that has an obvious custom property called Classification. It appears on the File Info properties list with a red asterisk next to it but I can't find it in the Custom Properties or Quick Parts. It also allows me to select a value from a dro down list on the...

Further to this thread I started: https://www.mrexcel.com/forum/excel-questions/1052067-collection-slow.html Here's the code: ClsData: Option Explicit Private pDayOfWeek As String Private pFruit As String Public Property Get DayOfWeek() As String DayOfWeek =...

Im Trying to learn how to use classes. The first one works like as charm but the second one is a real pain and I cant figure ot the issue. For som reason it works if I remove the technican1 get property. But I need to write and read from the class. It returns : Definition of the...

Why do I get a compile error (Invalid use of property) on the RowSource line? With Sheets("Current") cboStartingLevel.RowSource "Current!CP_Level_Choice_Options" cboStartingLevel.ListIndex = Sheets("Current").Range("CP_Level_Choice") - 1

I have a form upon which is a combo box. When I initialise the form, I have the following line cboShow_CP.ListIndex = Sheets("Current").Range("Show_CP_Prem_Choice") - 1 I get the error "Could not set the ListIndex property, Invalid Property Value. The value I get for...

I have some data (spanning a few hundred thousand rows) in column A, such as: Day Monday Tuesday Friday ClsData: Option Explicit Private pDayOfWeek As String Private pFruit As String Public Property Get DayOfWeek() As String DayOfWeek = pDayOfWeek End Property...

Hi I am trying to get the property value of a UserForm Control but using the Control Name and the Property stored in string variables. I loop through all Controls on the form and a list of properties for each Control Type and use the last line of code to assign the property value to the...

I am working though the Creating Classes, records and collections chapter in Bill's book VBA and macros for excel. I placed the following code in my non class module. I have my locals windows open and can see that when a new record is added to colEmployees all the items in the collection are up...

Hi all, As part of my role as a construction manager I carry out inspections of properties and tender works for them. The type of property (retail, commercial, industrial etc) determines what sort of typical works that will be required. I have a list of typical works to a building which...