Go Back   Access World Forums > Search Forums

 
Showing results 1 to 5 of 5
Search took 0.00 seconds.
Search: Posts Made By: arnelgp
Forum: Modules & VBA 09-15-2019, 10:22 AM
Replies: 15
Views: 280
Posted By arnelgp
Forum: Modules & VBA 09-14-2019, 10:02 PM
Replies: 15
Views: 280
Posted By arnelgp
Re: Update Statement with a listbox Filtering & Combobaox

try uploading a sample db with your form and master table.
Forum: Modules & VBA 09-14-2019, 08:49 AM
Replies: 15
Views: 280
Posted By arnelgp
Re: Update Statement with a listbox Filtering & Combobaox

ok, sorry, all your fields are Text:

Dim snNos As String
Dim v As Variant
For Each v In [SNSlcToLoc].ItemsSelected
snNos = snNos & "," & Chr(34) & [SNSlcToLoc].ItemData(v) & Chr(34)
Next...
Forum: Modules & VBA 09-14-2019, 05:59 AM
Replies: 15
Views: 280
Posted By arnelgp
Re: Update Statement with a listbox Filtering & Combobaox

change to this:

Currentdb.Execute "update [Master] Set [Loc] = " & Chr(34) & [ToLocSlct] & Chr(34) & " " & _
"where [sn] in (" & snNos & ");"
Forum: Modules & VBA 09-14-2019, 04:36 AM
Replies: 15
Views: 280
Posted By arnelgp
Re: Update Statement with a listbox Filtering & Combobaox

Dim snNos As String
Dim v As Variant
For Each v In [SNSlcToLoc].ItemsSelected
snNos = snNos & "," & [SNSlcToLoc].ItemData(v)
Next
If snNos<>"" Then
snNos = Mid(snNos, 2)
...
Showing results 1 to 5 of 5

 
Forum Jump



All times are GMT -8. The time now is 03:09 PM.


Microsoft Access Help
General
Tables
Queries
Forms
Reports
Macros
Modules & VBA
Theory & Practice
Access FAQs
Code Repository
Sample Databases
Video Tutorials

Featured Forum post


Sponsored Links


Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
(c) copyright 2017 Access World