User Profile

Collapse

Profile Sidebar

Collapse
rod4
rod4
Last Activity: Oct 7 '16, 09:28 AM
Joined: Jun 8 '15
Location:
  •  
  • Time
  • Show
  • Source
Clear All
new posts

  • Sorry for my late reply, but yes of course i would be interested. i still am. especially since i didnt find any other way to make my form look good. :)))
    See more | Go to post

    Leave a comment:


  • rod4
    started a topic MS Access Datasheet Views with a different look

    MS Access Datasheet Views with a different look

    Hello Guys and Girls,
    i guess a stupid question, but i try my luck here.

    is it possible to give the datasheet in MS access a different look, put the table names into the rows and the data into the columns? since i didnt find anything in internet about it. i guess its a NO?

    firstname | Frank | Fred | Paul | Sean
    lastname | Price | Ward | Sanders | Trent

    instead of:

    ...
    See more | Go to post

  • rod4
    replied to Import an Excel Sheet with File Dialog
    THANKS a lot!!!! it works like a charme!
    See more | Go to post

    Leave a comment:


  • rod4
    started a topic Import an Excel Sheet with File Dialog

    Import an Excel Sheet with File Dialog

    hi guys,

    i had made a simple import menu for xlsx, xls and accdb files from the current project folder with fixed name. see below the xlsx_data_impor t.

    Code:
    Private Sub xlsx_Data_Import_Click()
    
    On Error Goto ErrorHandler
       
        DoCmd.TransferSpreadsheet acImport, , "Data", Application.CurrentProject.Path & "\Data_Backup.xlsx", True, "Data!"
    
        Exit
    ...
    See more | Go to post

  • rod4
    replied to DoCmd.openForm with goto???
    I cant understand why i didnt find this "Openargs" myself! Thanks that you leed me the way. Here the Code i used to make it happen.

    Code:
    Private Sub Field1_DblClick(Cancel As Integer)
    
        DoCmd.OpenForm "Detailed Form", , , , , , [Tdate]
        
        Dim strTDate As Date
        strTDate = Forms![Detailed Form].OpenArgs
        If Len(strTDate) > 0 Then
            DoCmd.GoToControl
    ...
    See more | Go to post

    Leave a comment:


  • rod4
    started a topic DoCmd.openForm with goto???

    DoCmd.openForm with goto???

    hello guys,

    i made a datasheet form with a selected number of fields. but you can doubleclick each record to go into the detailed record form. in the first two fields i put in this...

    Code:
    Private Sub Field1_DblClick(Cancel As Integer)
    
        DoCmd.OpenForm "Detailed Form", , , "[Tdate] = #" & [Tdate] & "#"
    
    End Sub
    that the form will be openend...
    See more | Go to post

  • rod4
    replied to No current record after adding IF THEN ELSE
    Sorry, yes i mean the runtime error! but not the runtime error 2501 its the runtime error 3021. whatever difference that makes. i will try now the error resume next routine...

    and it works fine! :) thanks.

    just with a minor change, because i have some msgboxes coming after the SaveRecord.

    Code:
    Private Sub Save_Score_Click()
    
    On Error GoTo GetOut
    
    DoCmd.RunCommand acCmdSaveRecord
    ...
    See more | Go to post

    Leave a comment:


  • rod4
    replied to No current record after adding IF THEN ELSE
    yes! i press the SAVE button and then decide to press NO, because i might forgot something in the record! then i get the error message ...

    no current record
    See more | Go to post

    Leave a comment:


  • rod4
    replied to No current record after adding IF THEN ELSE
    ok,
    i hope i got you right. i changed back the button close onclick event to

    Code:
    Private Sub Save_Click()
    
    DoCmd.RunCommand acCmdSaveRecord
    
    End Sub
    and in the forms beforeupdate event i put in your ...

    Code:
    Private Sub Form_BeforeUpdate(Cancel As Integer)
            If Not (vbYes = MsgBox("Are you sure you want to save this record?", vbYesNo + vbQuestion,
    ...
    See more | Go to post

    Leave a comment:


  • rod4
    started a topic No current record after adding IF THEN ELSE

    No current record after adding IF THEN ELSE

    hello guys,

    i have made a button in a form (access 2007) for saving a record, the record will be only saved with this button with this command in the buttons onclick event...

    Code:
    DoCmd.RunCommand acCmdSaveRecord
    now i thought, i wanna add a msgbox question like below.

    Code:
    Dim blnsave As Integer
    
    blnsave = MsgBox("Are you sure you want to save this record?", vbYesNo + vbQuestion, "Save
    ...
    See more | Go to post

  • rod4
    replied to How to refresh the second combo box?
    Thanks that was the perfect reply! i was so close but then so far! ;)
    the spaces problem is the next item on my lists of problems to solve!
    thanks a lot!!!
    See more | Go to post

    Leave a comment:


  • rod4
    started a topic How to refresh the second combo box?

    How to refresh the second combo box?

    Hello guys,

    i have made a data entry form with two combo boxes.

    The first one called [company ID] from the table [company] with the

    row source:
    Code:
    SELECT [company].[company ID], [company].[company name] FROM company;
    so i don't need to remember the company ID but can see the company name connect to the company ID instead.

    the next combo box is called [subs...
    See more | Go to post

  • rod4
    replied to Troubles with date variable
    Sorry won't happen again!
    See more | Go to post

    Leave a comment:


  • rod4
    replied to Troubles with date variable
    thanks a lot! i had this idea already too, but with the wrong syntax! :)
    See more | Go to post

    Leave a comment:


  • rod4
    started a topic Troubles with date variable

    Troubles with date variable

    hello guys,

    my goal is to open with doubleclick a record in a datasheet a form where i can see the records full page with more informations. so i dblclick on the field IDate and the form opens with the correct date and according informations in the record of this date.

    the modul looks as follows:

    Code:
    Private Sub Info_DblClick (Cancel as Integer)
    
        DoCmd.OpenForm "InfoForm" ,,, "[IDdate]
    ...
    See more | Go to post
    Last edited by Rabbit; Jul 1 '15, 11:32 PM. Reason: Please use [code] and [/code] tags when posting code or formatted data.

  • hi jforbes,

    thanks for your help! i am trying this right away!
    See more | Go to post

    Leave a comment:


  • How to use login username to filter all records in the current database.

    hello guys,

    how can i use the login username to filter all records in the specific database the user is working on, including looking into his profile information table and editing it (only finding his profile data), create new records in performance tables (with his username stored as well) etc.

    how can i store the username till the user is logout or exit the database?
    See more | Go to post
No activity results to display
Show More
Working...