I am completely unfamiliar with the VBA atmosphere. I tried to break this line into several lines, but I failed. Can someone help me break this code into multiple lines?
DoCmd.RunSQL "UPDATE INDIVIDUAL SET INDIVIDUAL.INDI_FIRSTNAME = '" & prospect_contact!FirstName & "', INDIVIDUAL.INDI_LASTNAME = '" & prospect_contact!LastName & "', INDIVIDUAL.INDI_TEL = '" & prospect_contact!BusinessTelephone & "', INDIVIDUAL.INDI_ADDRESS1 = '" & Replace(prospect_contact!Street, "'", "") & "', INDIVIDUAL.INDI_ADDRESS2 = '" & Replace(prospect_contact!Street1, "'", "") & "', INDI_STATUS = '" & pro & "',INDIVIDUAL.INDI_FUNEL1 = '" & prospect_contact!QualificationStatus & "', INDIVIDUAL.INDI_COUNTRY = '" & prospect_contact!Country_Employer & "', INDIVIDUAL.ACCT_NAME = '" & Replace(prospect_contact!Employer, "'", "") & "' WHERE INDIVIDUAL.INDI_FULLNAME = '" & key & "';"
UPDATE: I tried this with & _, but I get a syntax error and the code turns red in VBA. I am making a mistake with commas or quotes. I have no idea.
DoCmd.RunSQL "UPDATE INDIVIDUAL SET INDIVIDUAL.INDI_FIRSTNAME = '" & prospect_contact!FirstName & "', & _ INDIVIDUAL.INDI_LASTNAME = '" & prospect_contact!LastName & "', & _ INDIVIDUAL.INDI_TEL = '" & prospect_contact!BusinessTelephone & "', & _ INDIVIDUAL.INDI_ADDRESS1 = '" & Replace(prospect_contact!Street, "'", "") & "', & _ INDIVIDUAL.INDI_FUNEL1 = '" & prospect_contact!QualificationStatus & "', & _ INDI_STATUS = '" & pro & "', & _ INDIVIDUAL.INDI_COUNTRY = '" & prospect_contact!Country_Employer & "', & _ INDIVIDUAL.ACCT_NAME = '" & Replace(prospect_contact!Employer, "'", "") & "' & _ WHERE INDIVIDUAL.INDI_FULLNAME = '" & key & "';"
UPDATE 2:
IT WORKS! IT WORKS! IT WORKS! thanks @Bathsheba, @TheLaurens :)
vba ms-access-2007
codious
source share