Search results

  1. B

    showing the id of a new record when click on save

    hello i want to get the id of a new record in a msgbox this is my code Dim MSG As Integer Dim ExistentID As Long ExistentID = Nz(DLookup("P_ID", "tbl_Personal_Information", "Full_Name = Forms!frm_New_Person!F_N"), 0) If ExistentID > 0 Then '-------------------------- MSG1 = MsgBox("this...
  2. B

    need to remove a specific word from a field

    I hope that i can explain my problem I have a column named "stuffno" that i should enter the id of my stuff I should enter "no 111" I did this because some stuff dont have id's so if i make a calculated field "No " & [stuffno] I will get in the field of stuffno1 "no " for the stuff without id...
  3. B

    making all the text box grow the same size

    i found it ReDim strcontrol(12) instead of ReDim strcontrol(13)
  4. B

    making all the text box grow the same size

    i found this solution On Error Resume Next Dim lngCounter As Long, dblMaxHeight As Double dblMaxHeight = 0 ReDim strcontrol(13) strcontrol(0) = "txt1" strcontrol(1) = "txt2" strcontrol(2) = "txt3" strcontrol(3) = "txt4" strcontrol(4) = "txt5" strcontrol(5) = "txt6" strcontrol(6) = "txt7"...
  5. B

    making all the text box grow the same size

    thanks my dear i will install office 2003 first so i can open Steven Lebans file and then i will try it
  6. B

    making all the text box grow the same size

    hello i maked a report that contains 10 textboxes beside each other and i changed the option (can grow) of the textboxes to yes the growing is okay but i want all the textboxes to grow the same size as the bigger one any help?
  7. B

    combination error

    It's done I change the default value of toggle button to false instead of nothing Thanks all
  8. B

    combination error

    guys any help????
  9. B

    combination error

    Dim MSG As String If Me.tgl_Empty.Value = False And DCount("*", "qry_Stolen_Cars") > 0 Then DoCmd.OpenReport "rpt_Stolen_Cars", acViewPreview ElseIf Me.tgl_Empty.Value = False And DCount("*", "qry_Stolen_Cars") = 0 Then MSG = MsgBox("Stolen cars report is empty please check the dates or...
  10. B

    Variable not defined

    that one is highlighted strsql101 = i did anything else as they mentioned in the first post i check the variable declaration when i closed the database and reopen it i got this message compile error in hidden module: Form_frm_Personal_Information_01. this error commonly occurs when code in...
  11. B

    Variable not defined

    hello there this is my code Private Sub cmdSave_Click() If DCount("P_ID", "tbl_Edbarat_Sanctions_1", "[P_ID] = " & [P_ID]) > 0 Then 'no need to enter the record because it's existed Else 'we should enter the record because it's not existed strsql101 = "insert into tbl_Edbarat_Sanctions_1...
  12. B

    get the sum of a field from table to table

    bro this is what i wrote in the onclick event using vba Update Table2 Set numberr = SUM(Table1.numberr) WHERE Table2.SID = Table1.SID but i get an error message Compile error: Sub or Function not defined i tried to make an update query it does not work could you give some hint
  13. B

    get the sum of a field from table to table

    hello i have two tables 1- stuff (contains personal information and a field named days off) 2- days_off in the second table i just put the id of the customer with the number of day off for example 1 4 1 2 4 1 3 10 so what i want is to get the total of days off from...
  14. B

    pass value from form to any form

    ok sir i'll give it a try
  15. B

    pass value from form to any form

    hello if i want to pass value from textbox in a form to another textbox in a form i use Forms!Form1Name.FirstTextbox = Me.FirstTextbox this works fine but if i want to pass value from textbox in a specific form to any other form to a specific textbox for example txtname i have a form contain...
  16. B

    Conditional Formatting - Access 2013

    smig thank you bro i use instr() awesome
  17. B

    Conditional Formatting - Access 2013

    when using like *100* i got this message the espression you entered conatians invalid syntax you may have entered a comma without a preceding value or identifier this is what i wrote [txtCode] like *100*
  18. B

    Conditional Formatting - Access 2013

    hello i want to write an expression as a new rule in conditional formating section but i want that expression to see if TEXTBOX contains "100" so change the colors but i don't want to use equal because i have many records like 100/101 100/102 100/103 200/201 200/202 ......... so any help?
  19. B

    pass value from form to form

    thank you i forgot to put Forms!
  20. B

    pass value from form to form

    hello i have two form first form contains many textboxes second form is continuous and contains two textbox i make a shortcut to the second form so i can open it with Shift+F1 now when the form 2 open i want to double click on any row then the form 2 will close then the information well be...
Back
Top Bottom