Kod:
Private Sub YANSITMA_Click()
If Me.[FGALT10]![HESAPNO].Value = "600" Then
Me![FGALT]![HESAPNO] = "800"
Me![FGALT]![Y1] = Me![FGALT10]![Y1]
Me![FGALT]![Y2] = Me![FGALT10]![Y2]
Me![FGALT]![Y3] = Me![FGALT10]![Y3]
Me![FGALT]![Y4] = Me![FGALT10]![Y4]
Me![FGALT]![Y5] = Me![FGALT10]![Y5]
Me![FGALT]![HESABINADI] = Me![FGALT10]![HESABINADI]
Me![FGALT]![BORÇ] = Me![FGALT10]![BORÇ]
Me![FGALT]![ALACAK] = Me![FGALT10]![ALACAK]
End If
End Sub
Kod:
Private Sub YANSITMA_Click()
If Me.[FGALT10]![HESAPNO].Value = "600" Then
Me![FGALT]![HESAPNO] = "800"
Me![FGALT]![Y1] = Me![FGALT10]![Y1]
Me![FGALT]![Y2] = Me![FGALT10]![Y2]
Me![FGALT]![Y3] = Me![FGALT10]![Y3]
Me![FGALT]![Y4] = Me![FGALT10]![Y4]
Me![FGALT]![Y5] = Me![FGALT10]![Y5]
Me![FGALT]![HESABINADI] = Me![FGALT10]![HESABINADI]
Me![FGALT]![BORÇ] = Me![FGALT10]![BORÇ]
Me![FGALT]![ALACAK] = Me![FGALT10]![ALACAK]
End If
If Me.[FGALT10]![HESAPNO].Value = "630" Then
Me![FGALT]![HESAPNO] = "830"
Me![FGALT]![Y1] = Me![FGALT10]![Y1]
Me![FGALT]![Y2] = Me![FGALT10]![Y2]
Me![FGALT]![Y3] = Me![FGALT10]![Y3]
Me![FGALT]![Y4] = Me![FGALT10]![Y4]
Me![FGALT]![Y5] = Me![FGALT10]![Y5]
Me![FGALT]![HESABINADI] = Me![FGALT10]![HESABINADI]
Me![FGALT]![BORÇ] = Me![FGALT10]![BORÇ]
Me![FGALT]![ALACAK] = Me![FGALT10]![ALACAK]
End If
End Sub