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!

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

Recent content by Gemino

  1. Gemino

    Superscript in Word

    Ah, after a bit of playing around and manipulation I have it working. It does mean I need to change Managed30 in my tables to Managed#30 just so that I'm not replacing any actual values of 30 in the report. oWord.SELECTION.FIND.Execute('#30',,,.T.,,,.T.,1) lcFoundText=oWord.SELECTION.TEXT DO...
  2. Gemino

    Superscript in Word

    After looking at the VB code, it appears as if the curser is moving through the document a set number of places. I would quite like it to find the word, rather than me specify the number of places. I tried using my search and replace code, I thought maybe if I found the "60" and replaced it...
  3. Gemino

    Superscript in Word

    Thanks JRB-Bldr, thats what I tried to get the oWord.selection.Font.superscript = .t. working! I'll have a closer look at the selection of the 60. Thanks Gemino
  4. Gemino

    Superscript in Word

    Right. So I have gotten this code to work oWord.selection.Font.superscript = .t. But now I have to get it to select the 60, my search code didn't hold onto the selection.
  5. Gemino

    Superscript in Word

    If I could somehow define the "60" as an object I could use something along the lines of lcnew.Font.superscript = .t. where lcnew = 60 but I'm not really sure how to do this?
  6. Gemino

    Superscript in Word

    Hi, I was wondering how do I input superscripts into word? Essentially on my report I generate (in word) it inserts lets say "Managed60" from an array or curser. I would like to search through the document and replace any "Managed60" text with "Managed60" I have already written the code...
  7. Gemino

    Excel Graph to Word

    Hey Mike, thanks for the book link, it is quite good. I have avoided using ranges (only because I didn't understand how to use them) by having a template form already made up, and then having code that searches for and reads anything between "<>" symbols in the template document, and executes...
  8. Gemino

    Excel Graph to Word

    Hi Mike, you are more than welcome to butt into this... ah.. conversation... haha. Is there a good website that explains how to create Range Objects? I have dabbled on this recently for adding in a picture into a bookmark, but I couldn't find any references as to what I could define as a...
  9. Gemino

    Excel Graph to Word

    Don't know why I'm replying in here, but its helping my thought process. I just copied it into a text box and all was solved. Probably not the most eloquent way, I'm sure there must be a more efficient way, but it works!
  10. Gemino

    Excel Graph to Word

    Well That was much easier than I thought oExcel.ActiveSheet.ChartObjects("Chart 4").Activate oExcel.ActiveChart.ChartArea.Copy oWord.Selection.Paste The problem I now have is getting it to paste where I want it to in the document, along with certain wrapping formats.
  11. Gemino

    Excel Graph to Word

    Well I've worked out how to copy the chart now, now just have to try bring it across to word
  12. Gemino

    Excel Graph to Word

    I should note, I am using VFP9 and Office 2007
  13. Gemino

    Excel Graph to Word

    Hello, hopefully someone can help me, I'm fairly new to Foxpro and so far google and this forum has been my best friend up until now. I have written a program that generates a report using word automation populating multiple tables from a database. I have a template file due to ease of...
See more

Part and Inventory Search

Back
Top