Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: unica
  • Order by date
  1. unica

    Date time Picker

    Hi Sanjna, I think you might find it on the microsoft site. Go to search.microsoft.com and enter mscomct2.ocx as the search word. Or else try searching for it in Google, it must be out there somewhere ;-) Good luck! Regards, Unica
  2. unica

    Date time Picker

    Hi Sanjna, In the Additional Controls Dialog Box the control is called "Microsoft Date and Time Picker Control 6.0 (SP4)". If it is not listed there you can try to find the following file on your system (default location is C:\Windows\System) MSCOMCT2.OCX. If the file is present you can add a...
  3. unica

    Hoping Mouse Cursor in Word Application

    Hi Howard, I had the same problem last week. I know what caused it: my labtop has that little square touchmouse at the bottom of the keyboard, everytime my hand was over it, the "internal" mouse reacted on that touch. I didn't solve it, just made sure I didn't touch it anymore ;-) But I guess...
  4. unica

    Trap vbOkay or vbCancel from InputBox

    Hi there, this should work for you: Sub ActOnInputbox() Dim sAnswer As String sAnswer = InputBox("Input text", "Title") If Trim(sAnswer) <> "" Then 'user filled out the inputbox and clicked OK Else 'user did not fill out the inputbox or clicked cancel End...
  5. unica

    Protecting word files

    Hi kh707, maybe converting them to pdf-files is an option? Regards, Unica
  6. unica

    how to pause in word

    Hi MrSR, maybe you can create a userform which pops up. After the user hits the [OK] on your form, the full text (the static and variable text) can be inserted in the document. If the first text is necessary for the user to fill out the variable text correctly, you can provide that on the...
  7. unica

    Inserting Multiple line address list box

    Hi Rolex55, I guess you want to be able to quickly insert a full company address in you Word document? If yes, there are two ways you can deal with this: 1. Type the full address in you Word document, then select all the lines. Then go to Insert - AutoText - New. Enter a meaninfull name for...
  8. unica

    Save As in Word 2K

    So there must be some code in the FileSaveAs procedure of the template where the document is created from. Maybe you can add a check if the document to be 'FileSaveAs' is a new document and then call the FileSave procedure, or show the user the FileSaveAs window. The rest of the code that...
  9. unica

    Tab feature between Text Boxes in Word?

    Eric, If you are using textboxes in the document itself then you must be talking about the formfields in Word. If you want users to only fill out the fields then you will have to protect your document when you're done making it. (standard toolbar - extra - protect document, choose formfields...
  10. unica

    Combobox values to a work sheet crashing Excel

    Hi David, Try this one: Private Sub ComboBox5_Change() Worksheets(&quot;Sheet1&quot;).Range(&quot;A1&quot;).Value = ComboBox5.Value End Sub Good luck. Regards, Unica
  11. unica

    Tab feature between Text Boxes in Word?

    Hi Eric, On a VBA Userform you can set the tab-order by rightklicking on the userform. There you will find the option &quot;taborder&quot;. Or you can use the property TabIndex on the properties list. I do not really understand you last question... you want some fields disabled? Regards, Unica
  12. unica

    Save As in Word 2K

    Hi polymath5, Have you tried deleting/renaming the user's normal.dot? Sometimes this helps clearing up some unexplainable issues in Word. Good luck. Regards, Unica
  13. unica

    Numbering documents automatically

    Hi Ken, You could use the registry for keeping track of a sequential number. The values will be entered in: HKEY_CURRENT_USER\Software\VB and VBA Program Settings Code would look like this: Private Sub GetDocNumber() Dim sDocNumber As String Dim iDocNumber As Integer Dim sYear As String Dim...
  14. unica

    Save name in Word XP

    Hi Ken, yes it can be done. But you must have some reference to the company name. So either it has to be in a bookmark in your document or you must be 100% sure it is always the first word in your document. If it's the first word in your document you can build your documentname as follows: Sub...
  15. unica

    Save name in Word XP

    Hi TillTek, You can put additional code in the standard Word functionality. This will open the File Save As Window with the documentname &quot;YourDocumentName.doc&quot;: Sub FileSaveAs() With Dialogs(wdDialogFileSaveAs) .Name = &quot;YourDocumentName.doc&quot; .Show...
  16. unica

    How to Disable Printer In Word

    Hi jcmv007, you can manipulate the standard Word functionality. I think thats the best place to put your code for what you want. It would look something like this: Public Sub FilePrint() Dim iAnswer As Integer 'your code here '..... '..... iAnswer = MsgBox(&quot;Would you like to print...
  17. unica

    Copy multiple .DOC's into a single .DOC

    Hi ClarkJeff, I assume you want this to be done using automation. Here's a procedure I think might be what you are looking for: Private Sub GetFiles() Dim sFile As String Dim sFiles() As String Dim sPath As String Dim intCount As Integer ReDim sFiles(0)...
  18. unica

    Disable the Close (X) button in a Word Document

    Hi nochoise, There is a way to prevent the user to use the [x] to close a form. Put this sub in your code: Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) If CloseMode = vbFormControlMenu Then 'show the user a message MsgBox &quot;Please use the [Exit]...
  19. unica

    Format a textbox

    Hi max, I assume you are talking about a textbox on a Userform? If yes, you can code some lines in the OnExit event of the textbox: Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If IsNumeric(TextBox1) Then 'be sure a number is filled out TextBox1 =...
  20. unica

    Attachments Vanish

    Hi Connor66, this link might be helpfull: http://www.slipstick.com/outlook/esecup/getexe.htm#ol2002 Regards, Unica

Part and Inventory Search

Back
Top