Ok thanks for looking but i have sorted it buy rearranging the code to the following. Private Sub Button_AL_Click() On Error GoTo Err_Button_AL_Click Dim Status As String Status = "AL (Unpicked)" If IsNull(Me.Status1) Then Me.Status1 = Status: Me.Date1 = Date: Me. [Active status] = Status: GoTo jump1: If IsNull(Me.Status2) Then Me.Status2 = Status: Me.Date2 = Date: Me. [Active status
On Jul 27, 11:08 pm, Ken Sheridan <KenSheri...@discussions.microsoft.com> wrote: In that case you will have to loop through the status controls on your main form until one is Null then assign the value to that, e.g. Dim frm As Form Dim ctrl as Control Dim n As Integer Set frm = Forms!YourMainFormNameGoesHere For n = 1 to 10 ctrl = frm.Controls("Status" & n)
"noon" <Nun@mail.com> ha scritto nel messaggio news:479c6f1f$0$36446$4fafbaef@reader5.news.tin.it... Volevo sapere se con 2 sterline e possibile fare una spedizione traccciabile. No verso Italia no come puoi vedere qui: http://www.royalmail.com/portal/rm/jump1?catId=400023&mediaId=400033 Il sovrapprezzo per Airsure è solo lui di £4.20. Quello International Signed For è di £
Fahrverbot in 20 deutschen Städten überflüssig? Kaum haben die ersten Städte (Berlin, Hannover, Köln) Umweltzonen und Fahrverbote ausgerufen, da wird amtlich: Der Feinstaub hat sich aus dem Staub gemacht! Der Dreck in unserer Stadtluft - buchstäblich vom Winde verweht! WAR DER RIESIGE BÜROKRATIE-AUFWAND ÜBERFLÜSSIG? Das Umweltbundesamt bestätigt: 2007 wurde nur an 22 der bundesweit 385
On Jan 22, 2:29 pm, "dkel...@hotmail.com" <dkel...@hotmail.com> wrote: ; divide number between 0 and 800 by 10 ; hl = dividend ; returns: ; a = quotient ; h = remainder Joseph carr "z-80 microcomputer handbook" p. 190. Put the 16-bit value in HL, put the 8 bit value in C and zero in B. Then shift HL left and subtract BC successively. In effect you are shifting BC right relative
