Recent content by benjamin.grimm

Dear all, i have a spreadsheet with data, which get imported to Excel. The spreadsheet is called "Rohdaten". The data get transfered via VBA to the spreadsheet "TG2". In the spreadsheet specific data get merged and sorted. This works perfectly. See attached file. The merged cells are one...

It works. Great thank you.

hello i want to open different .doc files by a button from access. I want that the vba code checks where the current access database is located. In which folder the the current access database is. In this file folder i have a folder called documents. In this folder i have the...

Option Compare Database Option Explicit Private mblnUp As Boolean Private mlngPos As Long Const cmlngMax As Long = 10 Const cmstrMsg As String = "Bitte warten, bin noch am arbeiten!"[/CODE] Private Sub Befehl13_Click() Dim xlApp As Object 'Excel.Application Dim xlBook As...

so the only think what i want to do ist that after the do while, the code from my "start button" starts and after the loop the code from my "end button starts". You know what i mean?

well it´s allright it works. greetz benjamin

hey thanks for the answer. Well my only question how can i put the code in my export code. i´ve created a start button and an end button start button Me.TimerInterval = 5 Me.OnTimer = "[Event Procedure]" mblnUp = True mlngPos = 1...

thanke for the answer. I am allright with the frm. I just don´t know why the green button is not moving. greetz benjamin

hello thanks for the answer. I tried to that now, i just have one problem, that the green progress bar is not moving. I´ve created a form with a green and a red bar. Then a modul with the following code: Option Compare Database Option Explicit Public Function FnBalkenanzeige(strMeldung...

hello togehter, how can i do a progress in bar in a do while. i export contract and during the export i want to have a progress bar. do while msgbox "the export runs", progress bar Loop Greetz benjamin

I dont know how to put the thread on solved! greetz benjamin

great. thank you that works!

I use access 2010 and excel 2010. I tried already a lot. I changed the code also. Now it works, but there is one more problem. I want that the Name is the ID and not ID (2) So right now the system names them 2(2), 3(3). I have a logical mistake somewhere, but i cant find it...

Thanks for your help! I changed the code to the following: Do While Not rstID.EOF Set xlSheet = xlBook.Sheets("Tabelle1") Set rstGr = CurrentDb.OpenRecordset("SELECT SAP, Geris, Pauschale, SuWID, Jahr_Y, Monat_X, BT_Name, Vertragsbeginn, Vertragsende...

That´s what i acutally would like to have. I just want to have one sheet and then at runtime copy it and rename it. but how does that work?