• WSForEachLoop

    WSForEachLoop

    @wsforeachloop

    Viewing 13 replies - 16 through 28 (of 28 total)
    Author
    Replies
    • in reply to: Whole Words Only In Concordance Automark? #1263907

      Nice thought. It doesn’t account for all the other punction marks (.,/- and such). Even if it did, this is just one of a number of cases.

    • in reply to: Sharing VBA Events Code With Others #1258732

      Taking this one step further, Word has the convient template file that allows you to update code for all the template users just by switching out the template or making changes to it. Is there a similar feature in Excel?

      The problem with having code in one file is that all users sharing that code have to be updated individually. Can an addin be used but tied into the WithEvents?

    • in reply to: Sharing VBA Events Code With Others #1257856

      Excellent. Thanks!

    • in reply to: Making VBWD*.CHM Work #1254219

      Thanks for the suggestions. I found it (forgetting that you can look at the HTML). It was looking for the following:

      It does have to be on the same level as the calling file. I suspect there’s another file that does the same function, since my msohlp11.chm was in a odd place

    • in reply to: Determine Width of Table #1252043

      Macropod, thanks for the code. Sorry for the delay. This did the trick and works well.

    • in reply to: Determine Width of Table #1249796

      That’s an excellent answer, an approach I had not thought of, if it were a simple table. However, these tables have merged rows and columns, so that code can’t be used. For the time being I tried something like this, adding up cell widths. Ugly and slow. Comments?

      Code:
            Dim rightmostPosition As Long
              Dim rowWidth As Long
              Dim myCell As Cell
              Dim cellCount As Long
              Dim i As Long
              For i = 1 To ActiveDocument.Tables(1).Rows.Count
              
                  cellCount = 1
                  rowWidth = 0
                  
                  For Each myCell In ActiveDocument.Tables(1).Range.Cells
                      If ActiveDocument.Tables(1).Range.Cells(cellCount).RowIndex = i Then
                          'myCell.Select
                          rowWidth = rowWidth + ActiveDocument.Tables(1).Range.Cells(cellCount).Width
                      End If
                      cellCount = cellCount + 1
                      
                      DoEvents
                  Next
                  
                  If rowWidth  rightmostPosition Then rightmostPosition = rowWidth
                  End If
              
                  DoEvents
              Next i
    • in reply to: Word Loses All Revisions When Saving #1243676

      Excellent call. Thanks. I didn’t think to check that. It seems DocVerse was the culprit.

    • in reply to: Extra CRLF In Replace? #1228930

      Excellent. Works like a charm.

      Out of curiosity though, why does the original search add an extra line only to the last line?

    • in reply to: Finding All Excel Instances #1226750

      Excellent. Thanks. I wouldn’t have come up with that.

    • in reply to: Finding All Excel Instances #1226668

      Just listing them is good enough. From there I can get the owing instance. How would list all the open workbooks from among the Excel instances?

    • in reply to: Finding All Excel Instances #1226654

      Trying to find all the open workbooks.

    • in reply to: Get All Word Instances #1226611

      Even though Word does usually open in a single instance, the fact is you can still have multiple instances, so going through the documents list isn’t always going to catch all the documents.

      Has anyone done this before, getting a specific instance from among all the running ones?

    • in reply to: Word 2007's Paste Special HTMLRTF #1225831

      So is there an example when this paste would make a difference?

      I looked at the underlying XML (not binary) and there was no difference. However, I could see some times when it could be handy to copy from a Web page to Word and keep it as HTML, ocassionally as RTF, too.

    Viewing 13 replies - 16 through 28 (of 28 total)