Help with writing VBA for data entry form

GA036872

New Member
Joined
Jul 8, 2022
Messages
13
Office Version
  1. 365
Platform
  1. Windows
Hi

Hope you can help me. I’m trying to create an excel data-entry form using VBA to capture data and -- when submitted -- paste the data onto a separate tab on the spreadsheet. This is what I have so far.

1678062302134.png


This form will be used by my colleagues when they collect information from customers. At the moment they are collecting the info and putting it on a word document to email over and most of the time the wrong information is provided, and it takes a long time to rectify. I want to get this Form to work so that the information can be provided correctly through Sharepoint in Microsoft Teams. It’s important that multiple people can use the Form at the same time.

I need help applying the following restrictions. Any help would be appreciated! 😊

When the user enters data into the AccountReferenceTextBox, we need it to do the following:
  • be restricted to 14 characters​
  • only allow numbers​
  • not allow any spaces​
  • Return an error message stating the following if anything other than a number is entered, or a number that is less than 14-digits-long is entered: “Please check that you’ve entered the correct number of digits and/or omitted any hyphens and/or spaces.”​
AccountReferenceTextBox must be filled out before the user can submit the Form.

The user must select an option from the TenantOneTitleComboBox before they can submit the Form.


When the user enters data into the TenantOneForenameTextBox – we need to do the following:
  • not allow any spaces​
  • capitalise the first character entered into TenantOneForenameTextBox or insist on the user capitalising the first character of the forename.​
  • only allow characters, one hyphen in case the customer has a double-barrel Forename, and one apostrophe in case the customer has a surname such as De’wayne.​
  • The first character entered after a hyphen needs to be capitalised.​
  • Return an error message stating the following if any spaces, extra hyphens, or extra apostrophes are entered: “This field does not accept spaces and/or more than one hyphen and/or apostrophe."​
TenantOneForenameTextBox must be filled out before the user can submit the Form.

When the user enters data into the TenantOneSurnameTextBox – we need to do the following:
  • not allow any spaces​
  • capitalise the first character entered into TenantOneSurnameTextBox or insist on the user capitalising the first character of the surname.​
  • only allow characters, one hyphen in case the customer has a double-barrel surname, and one apostrophe in case the customer has a surname such as O'Brien. The first character entered after a hyphen or apostrophe needs to be capitalised.​
  • Return an error message stating the following if any spaces, more than one hyphens, or more than one apostrophe is entered: “This field does not accept spaces and/or more than one hyphen and/or apostrophe."​
TenantOneSurnameTextBox must be filled out before the user can submit the Form.

The above should also apply to the following:
  • TenantTwoTitleComboBox​
  • TenantThreeTitleComboBox​
  • TenantTwoForenameTextBox​
  • TenantThreeForenameTextBox​
  • TenantTwoSurnameTextBox​
  • TenantThreeSurnameTextBox​
  • Except these don’t have to be filled out unlike TenantOneTitleComboBox, TenantOneForenameTextBox and TenantOneSurnameTextBox which must. We also need to give the user the option to delete their selection in case they clicked it by mistake as I have all the combo boxes set to drop down list so that anything other than what’s in the drop down menu cannot be typed or selected.
When the user enters data into the TenancyStartDateTextBox – we need it to do the following:
  • be restricted to 10 characters​
  • not allow the user to enter anything other than numbers and forward slashes. This is so the data is captured in the following format: 01/01/2010. If anyone knows a way of inserting a calendar so that the user can select a date from that, that’d be really useful!​
  • Return an error message stating the following if any spaces and/or anything other than a number or forward slash is entered: “This field must be entered in the following format: 01/01/2023.”​
TenancyStartDateTextBox must be filled out before the user can submit the Form.

When the user enters data into the PostCodeTextBox – we need it to do the following:
  • be restricted to 8 characters.​
  • only allow one space​
  • only allow capital letters and numbers.​
  • Return an error message stating the following if the above conditions are not met: "This field must be entered in the following format: S8 7LA."​
PostCodeTextBox must be filled out before the user can submit the Form.

When the user enters data into the FLATextBox – we need it to do the following:
  • Not to allow anything other than numbers, characters, and a maximum of two commas that must have a space after them.​
  • There must be a number or Capitalised character after each space​
  • Return an error message stating the following if the above conditions are not met: “This field does not accept anything other than numbers, characters, and a maximum of two commas."​
FLATextBox must be filled out before the user can submit the Form

The user must select an option from the HouseholdCompositionComboBox before they can submit the Form.


When the user enters data into the WaterRatesTextBox – we need it to do the following:

  • be restricted to 6 characters – these six characters should also include a pound symbol which has already been inserted into the WaterRatesTextBox when the user opens the Form and can’t be removed. This is so that the data is input in the following format i.e. to two decimal places: £10.00​

WaterRatesTextBox must be filled out before the user can submit the form.

When the user enters data into the NetRentTextBox – we need it to do the following:

  • Only allow numbers
  • be restricted to 7 characters - these seven characters should also include a pound symbol which has already been inserted into the NetRentTextBox when the user opens the Form and can’t be removed. This is so that the data is input in the following format i.e. to two decimal places: £100.00.​

NetRentTextBox must be filled out before the user can submit the Form.

When the user enters data into the HousingBenefitTextBox, we need it to do the following:
  • Only allow numbers​
  • be restricted to 7 characters - these seven characters should also include a pound symbol which has already been inserted into the HousingBenefitTextBox when the user opens the Form and can’t be removed. This is so the data is input in the following format i.e. to two decimal places: £100.00.​
  • If the user selects No from HousingBenefitComboBox – then it enters the following into HousingBenefitTextBox: “£0.00”. If the user selects or changes the answer to yes, then it allows them to type any amount other than £0.00 into HousingBenefitTextBox.​
HousingBenefitComboBox & HousingBenefitTextBox must be filled out before the user can submit the form

The user must select an option from the UCVerComboBox before they can submit the Form


When the user enters data into the UCVerTextBox, we need it to do the following:
  • Only allow numbers​
  • be restricted to 7 characters - these seven characters should also include a pound symbol which has already been inserted into the UCVerComboBox when the user opens the Form and can’t be removed. This is so the data is input in the following format i.e. to two decimal places: £100.00.​
  • If the user selects No from UCVerComboBox – then it enters the following into UCVerTextBox: “£0.00”. If the user selects or changes the answer to yes, then it allows them to type any amount other than £0.00 into UCVerTextBox.​
The user must select an option from the SharingDataComboBox before they can submit the Form

The user must select an option from the PermissionComboBox before they can submit the Form


The user must select an option from the AuditComboBox before they can submit the Form


The user must select an option from the HouseholdIncomeOneComboBox before they can submit the Form

When the user enters data into the HouseholdIncomeOneAmountTextBox, we need it to do the following:
  • Only allow numbers​
  • be restricted to 8 characters - these eight characters should also include a pound symbol which has already been inserted into the HouseholdIncomeOneAmountTextBox when the user opens the Form and can’t be removed. This is so that the data is input in the following format i.e. to two decimal places: £1000.00​
The above should apply to the following:

  • HouseholdIncomeTwoAmountTextBox​
  • HouseholdIncomeThreeAmountTextBox​
  • HouseholdIncomeFourAmountTextBox​
  • HouseholdIncomeFiveAmountTextBox​
  • HouseholdIncomeSixAmountTextBox​
  • HouseholdIncomeSevenAmountTextBox​

  • HouseholdIncomeFrequencyTwoComboBox​
  • HouseholdIncomeFrequencyThreeComboBox​
  • HouseholdIncomeFrequencyFourComboBox​
  • HouseholdIncomeFrequencyFiveComboBox​
  • HouseholdIncomeFrequencySixComboBox​
  • HouseholdIncomeFrequencySevenComboBox​
  • Except these don’t have to be filled out unlike HouseholdIncomeOneAmountTextBox and HouseholdIncomeFrequencyOneComboBox which must. We need to give the user the option to delete their selection in case they clicked it by mistake as I have all the combo boxes set to drop down list so that anything other than what’s in the drop down menu cannot be typed or selected.
The last thing we need is for all this information to be pasted onto the separate tab “New YWS Applications” when the submit button is selected.

1678058863723.png


If the mandatory fields are not answered, we need an error message to be returned when they attempt to submit the form stating which mandatory fields have not been filled out
 

Excel Facts

Repeat Last Command
Pressing F4 adds dollar signs when editing a formula. When not editing, F4 repeats last command.
Here is a copy of the vba I have so far; I currently only know how to add items for a drop down list:

VBA Code:
Private Sub UserForm_Initialize()

With TenantOneTitleComboBox 'declaring options that can be selected for the first customer's title. Mandatory

    .AddItem "Mr"
    .AddItem "Miss"
    .AddItem "Mrs"
    .AddItem "Ms"
    .AddItem "Mx"
    .AddItem "Rev"
    .AddItem "Dr"
    .AddItem "Cllr"
    
With TenantTwoTitleComboBox 'declaring options that can be selected for the second customer's title. Not mandatory

    .AddItem "Mr"
    .AddItem "Miss"
    .AddItem "Mrs"
    .AddItem "Ms"
    .AddItem "Mx"
    .AddItem "Rev"
    .AddItem "Dr"
    .AddItem "Cllr"
    
With TenantThreeTitleComboBox 'declaring options that can be selected for the third customer's title. Not mandatory

    .AddItem "Mr"
    .AddItem "Miss"
    .AddItem "Mrs"
    .AddItem "Ms"
    .AddItem "Mx"
    .AddItem "Rev"
    .AddItem "Dr"
    .AddItem "Cllr"
    
With HousingBenefitComboBox 'giving the user the option to select yes or no from the HousingBenefitComboBox. Mandatory

    .AddItem "Yes"
    .AddItem "No"
    
With UCComboBox 'giving the user the option to select yes or no from the UCComboBox. Mandatory

    .AddItem "Yes"
    .AddItem "No"
    
With UCVerComboBox 'giving the user the option to select yes or no from the UCVerComboBox. Mandatory

    .AddItem "Yes"
    .AddItem "No"
    
With SharingDataComboBox 'giving the user the option to select yes or no from the SharingDataComboBox. Mandatory

    .AddItem "Yes"

With PermissionComboBox 'giving the user the option to select yes or no from the PermissionComboBox. Mandatory

    .AddItem "Yes"
    
With AuditComboBox 'giving the user the option to select yes or no from the AuditComboBox. Mandatory

    .AddItem "Yes"
    
With HouseholdCompositionComboBox 'giving the user the option to select how how many adults and children live in the property. Mandatory

    .AddItem "One Adult"
    .AddItem "One Adult & One Child"
    .AddItem "One Adult & Two Children"
    .AddItem "One Adult & Three Children"
    .AddItem "One Adult & Four Children"
    .AddItem "One Adult & Five Children"
    .AddItem "One Adult & Six Children"
    .AddItem "One Adult & Seven Children"
    .AddItem "One Adult & Eight Children"
    .AddItem "One Adult & Nine Children"
    .AddItem "One Adult & Ten Children"
    .AddItem "Two Adults"
    .AddItem "Two Adults & One Child"
    .AddItem "Two Adults & Two Children"
    .AddItem "Two Adults & Three Children"
    .AddItem "Two Adults & Four Children"
    .AddItem "Two Adults & Five Children"
    .AddItem "Two Adults & Six Children"
    .AddItem "Two Adults & Seven Children"
    .AddItem "Two Adults & Eight Children"
    .AddItem "Two Adults & Nine Children"
    .AddItem "Two Adults & Ten Children"
    .AddItem "Three Adults"
    .AddItem "Three Adults & One Child"
    .AddItem "Three Adults & Two Children"
    .AddItem "Three Adults & Three Children"
    .AddItem "Three Adults & Four Children"
    .AddItem "Three Adults & Five Children"
    .AddItem "Three Adults & Six Children"
    .AddItem "Three Adults & Seven Children"
    .AddItem "Three Adults & Eight Children"
    .AddItem "Three Adults & Nine Children"
    .AddItem "Three Adults & Ten Children"
    .AddItem "Four Adults"
    .AddItem "Four Adults & One Child"
    .AddItem "Four Adults & Two Children"
    .AddItem "Four Adults & Three Children"
    .AddItem "Four Adults & Four Children"
    .AddItem "Four Adults & Five Children"
    .AddItem "Four Adults & Six Children"
    .AddItem "Four Adults & Seven Children"
    .AddItem "Four Adults & Eight Children"
    .AddItem "Four Adults & Nine Children"
    .AddItem "Four Adults & Ten Children"
    .AddItem "Five Adults"
    .AddItem "Five Adults & One Child"
    .AddItem "Five Adults & Two Children"
    .AddItem "Five Adults & Three Children"
    .AddItem "Five Adults & Four Children"
    .AddItem "Five Adults & Five Children"
    .AddItem "Five Adults & Six Children"
    .AddItem "Five Adults & Seven Children"
    .AddItem "Five Adults & Eight Children"
    .AddItem "Five Adults & Nine Children"
    .AddItem "Five Adults & Ten Children"
    .AddItem "Six Adults"

With HouseholdIncomeOneComboBox 'giving the user the option to select a form of income from the HouseholdIncomeOneComboBox. Mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Child Benefit"
    .AddItem "Charitable Payment"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeTwoComboBox 'giving the user the option to select a form of income from the HouseholdIncomeTwoComboBox. Not mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Charitable Payment"
    .AddItem "Child Benefit"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeThreeComboBox 'giving the user the option to select a form of income from the HouseholdIncomeThreeComboBox. Not mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Charitable Payment"
    .AddItem "Child Benefit"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeFourComboBox 'giving the user the option to select a form of income from the HouseholdIncomeFourComboBox. Not mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Charitable Payment"
    .AddItem "Child Benefit"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeFiveComboBox 'giving the user the option to select a form of income from the HouseholdIncomeFiveComboBox. Not mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Charitable Payment"
    .AddItem "Child Benefit"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeSixComboBox 'giving the user the option to select a form of income from the HouseholdIncomeSixComboBox. Not mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Charitable Payment"
    .AddItem "Child Benefit"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeSevenComboBox 'giving the user the option to select a form of income from the HouseholdIncomeSevenComboBox. Not mandatory

    .AddItem "Adoption Allowance"
    .AddItem "Armed Forces Compensation Scheme"
    .AddItem "Armed Forces Independent Payment"
    .AddItem "Assessed Income Figure"
    .AddItem "Attendance Allowance"
    .AddItem "Bereavement Support Payment"
    .AddItem "Boarded Child Income"
    .AddItem "Carer Allowance"
    .AddItem "Charitable Payment"
    .AddItem "Child Benefit"
    .AddItem "Child Maintenance"
    .AddItem "Child Tax Credit"
    .AddItem "Constant Attendance Allowance"
    .AddItem "Employment & Support Allowance"
    .AddItem "Earned Income"
    .AddItem "Jobseekers Allowance"
    .AddItem "Disability Living Allowance"
    .AddItem "Fostering Allowance"
    .AddItem "Guardians Allowance"
    .AddItem "Income from an Annuity"
    .AddItem "Independent Living Fund"
    .AddItem "Industrial Injuries Disablement Benefit"
    .AddItem "Maintenance"
    .AddItem "Maternity Allowance"
    .AddItem "New State Pension"
    .AddItem "Occupational Pension"
    .AddItem "Personal Injury Payment"
    .AddItem "Personal Independence Payment"
    .AddItem "Private Pension"
    .AddItem "Rent from Property"
    .AddItem "Savings Credit"
    .AddItem "Self-Employed Earnings"
    .AddItem "Severe Disablement Pension"
    .AddItem "State Retirement Pension"
    .AddItem "Trust Fund Income"
    .AddItem "War Disablement Pension"
    .AddItem "War Pension Mobility Supplement"
    .AddItem "War Widows Pension"
    .AddItem "Widowed Parents Allowance"
    .AddItem "Widows Pension"
    .AddItem "Working Tax Credit"
    .AddItem "Universal Credit"
    
With HouseholdIncomeFrequencyOneComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencyOneComboBox. Mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"
    
With HouseholdIncomeFrequencyTwoComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencyTwoComboBox. Not mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"
    
With HouseholdIncomeFrequencyThreeComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencyThreeComboBox. Not mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"
    
With HouseholdIncomeFrequencyFourComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencyFourComboBox. Not mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"
    
With HouseholdIncomeFrequencyFiveComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencyFiveComboBox. Not mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"
    
With HouseholdIncomeFrequencySixComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencySixComboBox. Not mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"
    
With HouseholdIncomeFrequencySevenComboBox 'giving the user the option to select a frequency from the HouseholdIncomeFrequencySevenComboBox. Not mandatory

    .AddItem "weekly"
    .AddItem "fortnightly"
    .AddItem "four-weekly"
    .AddItem "monthly"

End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With
End With


End Sub
 
Upvote 0

Forum statistics

Threads
1,224,737
Messages
6,180,648
Members
452,992
Latest member
TokugawaIesuma

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top