Search:

Thanks for reply.
I tried this code but nothing happens. Let me clear one thing that I initially created userforms in excel VBA and then exported to vb6. So they are named as userform. I tried to...

I have developed application with vb6. I have multiple userforms. I want a logout button code to unload all opened userform and load login form. Please guide me.

Ok thanks for guidance

At present I want to learn. Initially I created softwere as excel VBA only. So I have all tempalets in excel for printing. But then I had limitation of excel cell as it has fixed maximum hight and so...

Yes, I want word, PDF and excel files to be generated as most of the software provide. Please help me to solve it.
Thanks

I want to paste table into excel file and I have table saved in RTB as rtf data and same in database. If I use RTB.text then plain text is pasted not the table. Please guide me.

My code is given below


Sub printdischarge()


'On Error GoTo ErrorHandler

Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset

Finally word file generation and table printing problem solved using clipboard copy and then paste.

Now I wish to use similar method to print table into excel file but it shows error as "paste...

yes you are right. I have used word just to print data. Previously I was using datareport. Everything was ok except printing table. So I created word file to print table only. Thanks

Yes actually I want a table to be printed in word file which is saved as rtf data in database.

Yes actually I want a table to be printed in word file which is saved as rtf data in database.

Thanks for help. I used clipboard and it worked well. I have used it in a slightly different way(code given below). I wish to use same thing for excel but then paste method fails. Is there any way to...

Well I have table in RTB and I wish to print the same. If I use oDoc.Bookmarks.Item("LABS").Range.Text = RichTextBox1.Text then I get plain text without table.

I have developed hospital managment system. I have rich text box in userform. I save it in access database as .textrtf. It is working fine. I have designed command to generated word file with...

Thanks for your help. I could check if folder exist anf ifnot can create it. Thanks a lot.

I got the solution with "vbNormalFocus". Thanks
Is there a way that if the specific folder is not found vb will create it? Please guide me. Thanks

Thanks for reply. VBA.Shell worked but only thing is it opens behind the application so I have to minimise application and then only can go to specified folder. Please help me so the I can open it in...

Yes, actually I designed userform in excel VBA and then imported in vb6. I need a link on userform which on click directs to specific folder on server which contains PDF, word and other files. Path...

I have developed softwere with vb6. I want to place link of specific folder in userform. Folder is located in the server which is shared to all related computers. I want when ling is clicked, that...

so can anybody guide me how to print table in datareport

I have developd hospital managment softwere. I use access as databse. I use datareport to print data. I have one field name "Investigation" which contains .textRTF data from richtextbox. My data are...

I have developed hospital management software. I designed userform in excel vb and then transported to vb6. I have fields in patient discharge card which involves tables, bold letters, etc. So I need...

well this post is about datagrid and I dont have datagrid control. I tried to get datafrid but I failed. Please give some other option for this problem

Can anyone help me?

should I post it as a new thread as there is no reply?

Fantastic!
This worked very well and now no problem. It is very smooth and fast. Thanks a lot for your kind help. I was troubled since many days. Once again thanks.

Thanks for quick reply. My perpose is to open template excel file, write data in it and make it visible to user so that it can be used. It works fine on first time. If user wants to save it I use...

Dear friends,
I have developed application for patient data management. I have option for patient diacharge card. I have used access as database and datareport to print discharge card. I wish to add...

Dear friends,
I have developed application with VB6. I wish to create excel file using template excel file. My programme works fine when I generate report first time. But when I close excel file...

Dear friends,
I have developed application for patient data management. I have option for patient diacharge card. I have used access as database and datareport to print discharge card. I wish to...

I could remove that error with restructuring datareport. Now I have another problem. I wish to add "/min" after datafield Pulse. Also in BP I have two datafeld BPS and BPD. I need to combine them in...

Thanks for your help.
I want to clarify one thing that I originally build project in excel vba and the exported forms to vb6. Now new commands could not be placed in userform. That's why I used this...

I have developed application with vb6. At present I am using excel to generate report. I wish to shift to datareport for generation and printing data reports. I have written simple code to begin...

Thank you very much. This formula worked nice. Now no troubles at present. Hope it will work for long time. Once again thanks.

well actual code is long. I am giving cide for form initialise as below.
Private Sub UserForm_Initialize()

On Error Resume Next
Dim screenwidth, screenheight As Single



Frame3.Visible =...

Thanks for your keen interest and proper reply. Above code worked for me except one problem. It do not include end date means if I want to search 1 to 5, data of 1 to 4 i s displayed with missing...

well, application is developed originally in excel and then forms are imported to VB6.

I tried changing scalehight to me.scalehight but it si not working.

If anyone can suggest solution to this...

I have converted textbox into date with below code but still it is not working
Private Sub textbox14_AfterUpdate()
On Error Resume Next
Me.TextBox14 = Format(CDate(Me.TextBox14), "dd/mm/yyyy")
...

I have developed application with vb6. I have to run it on different computers over network. All computers have different resolution. So form is misfit and certain filelds are cut. So I have placed a...

SO it will not be possible to search by date using text box. I don't have DateTimePicker installed in my programme and I could not install in. If possible pl suggest some other way. Is it possible if...