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 dencom 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: WBURKERT
  • Content: Threads
  • Order by date
  1. WBURKERT

    vbscript PAPING - Ping to an IP Port Number

    I have this vbscript working but don't seem to know how to get the port number passed into the Function GetPingInfoIP(strComputer). The worksheet layout is Column A is an administrative entry, Column B is the Port Number, Column C is the IP address and Column D is the results and is shifted...
  2. WBURKERT

    Port Ping not working but IP PING does work.

    The kine below does not execute and may be causing my macro from running. paping.exe works without a problem from a command prompt. boolCode = objShell.Run("paping " & strWKB, 0, True) This line executes and is similar to what I am trying to accomplish with paping. 'boolCode =...
  3. WBURKERT

    objShell.Run Help

    I am trying to use the paping.exe in an EXCEL VBA but the command is not getting executed. Doing the same with Ping.exe works as expected. The code below is showing the ping command working and the paping.exe commented out. the paping command works when manually entered in the command window...
  4. WBURKERT

    Excel VBA Dialog Box

    I am trying to create a dialog box that has just two command buttons - ENGLISH and METRIC. I got the box and the buttons working but clicking on either button fails to exit the sub and then I am not sure how to pass the clicked button's value back to my macro that is nothing more than a bunch...
  5. WBURKERT

    WORD VBA Cell Shading - NO FILL

    I am trying to figure out the command to clear the shading in a particular cell within a WORD table. How come you can't record WORD macro's that are table related? Is there any place with all the commands and their syntax, I can not seem to find one good book or one good website for command...
  6. WBURKERT

    WORD VBA Splitting Tables on BREAKS

    Gentlemen, I have a finished document consisting of many tables, some tables are long and across page breaks and some tables are short and still cross page breaks. I would like to have a macro find tables that cross breaks - hard breaks (manually inserted; page or section), soft breaks (WORD...
  7. WBURKERT

    Word VBA Table Column and Data Formatting

    Could someone tell me the VBA syntax to make a column in a Word table right justified? I am also trying to make the Column(3) to always display numbers with two decimals and a comma seperating thousands. I would really, really like to have the column format be like currency - dollar sign...
  8. WBURKERT

    Cut works but not Paste?

    Why do I get an error when trying to do the .paste but not when doing the copy? Just when I think I make progress with understanding I stumble. - This is just a piece of my macro, and think it should be enough for you to see the error in my ways. Thanks in advace For sRow = 1 To...
  9. WBURKERT

    Keeping data format between EXCEL and WORD

    Here's my working code. I need to make column(3) currency format. I would like an Accounting format (dollar sign on left side of a cell and a two decimal place number to the right) But a Currency format, without any symbol could work too. Set Goods =...
  10. WBURKERT

    Trying to Calculate Print_Area

    Good Friday Morning to all the Tek-Tip guru's, This doesn't seem to be working as expected. I am trying to set the print_area for a couple hundred spreadsheets. The code seems to make the print_area the same for all worksheets. For s = 1 To 220 Application.StatusBar = "Setting Print...
  11. WBURKERT

    WHY DOES Set rngWithData fail?

    Here is a short portion of a WORD marco that fails executing the Line Set rngWithData. I have a great understand for programing logic but the syntax is beating me up. Sub Section_X_to_Word_Table_at_Bookmark_X() 'WORD variables Dim docDest As Word.Document Dim Goods As Word.Table...
  12. WBURKERT

    MACRO WONT WRITE TO WORKSHEETS - HELP

    Please help (I have a hunch I am missing just one instruction) -This routine first deletes all worksheets named SEC1 through SEC200 - this works fine -then recreates 200 new worksheets named SEC1 through SEC200 - this works fine. I always write new data to all worksheets SEC1 through SEC200 and...
  13. WBURKERT

    WORD vba CENTER a Table

    Here is a portion of code that is working nicely. I would like to center the table added at Bookmarks ("section_2"). I got the Table style and format working but need some help with centering the Table. Sub Section_X_to_Word_Table_at_Bookmark_X() 'WORD variables Dim docDest As...
  14. WBURKERT

    Delete a WORD Table at a Bookmark

    This is the code that is working for me right now. Before I Add a Table found at Bookmarks ("section_2") I would like to delete a table at Bookmarks ("section_2). It would be nice if no Table existed at Bookmarks ("section_2") that the code would just keep on executing and add a table at...
  15. WBURKERT

    OPEN EXCEL and SET RANGE from WORD VBA

    Could someone help me do these two steps in the SUBJECT. I am working a bigger macro that is giving me problems and I think it has to do with OPENING EXCEL and finding its RANGE. I don't want it to be ActiveSheet because the macro will be dealing with lots of worksheets and i don't want to...
  16. WBURKERT

    MACRO to put section_2.xls to WORD Bookmark Section_2

    Please, please help - my boss is unreasonable and I do not want to do things manually, especially more than once. I have about 100 EXCEL workbooks that vary in size that I would like to put into a single word document at a pre-defined bookmarks, replacing any table that might be there already...
  17. WBURKERT

    EXCEL VBA MOVING DATA

    Please be kind and help me out. I have a workbook with two worksheets. The first worksheet is all of my data, which is a parts list. Some parts exist in two sections. I have a column for the first section number and a second column for the second section. I want to copy parts from 'my all...

Part and Inventory Search

Back
Top