Hard question:

  • Thread starter Thread starter 1aae
  • Start date Start date
1

1aae

I have form and subform:

Subform contain 2 column columnA and Column xpression

ColumnExpression ColumnA (bond Column) ColumnCisuniqueID

1

2

3

is there any way to copy all the content of columnexpression to columnA by
using command button in a form…

Notes:

- Columnexpression contain Function and not bond to any field. (unbond)

- I can use copy and paste to paste value in columnA

- I have uniqueID

- the subform is bond to query.

- just I want to automate the process

thank you
 
Try This in the click event,

Dim Rst as Objec
Set Rst = Me.Recordsetclon
Rst.MoveFirs
D
Me.ColumnA = Me.columnexpressio
Rst.MoveNex
Loop Until Rst.EO
Msgbox("Completed"

This worked for me, when I needed to replace on field value on a form with a value from another field on the same form, However, I was not using a sub-form so the code may have to be modified to reflect that

Hope this helps


----- 1aae wrote: ----

I have form and subform

Subform contain 2 column columnA and Column xpressio

ColumnExpression ColumnA (bond Column) ColumnCisuniqueI







is there any way to copy all the content of columnexpression to columnA b
using command button in a formâ€

Notes

- Columnexpression contain Function and not bond to any field. (unbond

- I can use copy and paste to paste value in column

- I have uniqueI

- the subform is bond to query

- just I want to automate the proces

thank yo
 
Back
Top