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 Chriss Miller 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 Nikita6003

  1. Nikita6003

    Date stamp of a file

    Use the FileSystemObject - check out its properties Cheers Nikki [bat] Look, mommy, I'm flying!
  2. Nikita6003

    Excel VBA - Modeless UserForm Slowing Sub Performance

    Hi What controls do you have on your form? Or is it just the combobox? Cheers Nikki [bat] Look, mommy, I'm flying!
  3. Nikita6003

    Opening an Excel file in Access VBA

    Hiya, shot in the dark - but do you perhaps have another instance of Excel running on the machines where you get the error (check all active threads) I've had this happen to me as well & it turned out to be due to me not properly releasing my Excel objects. Went through the code & made sure I...
  4. Nikita6003

    VBA Clearing the clipboard.

    Hiya, You can use the DataObject to write to and read from the Windows clipboard. You'll need to set a reference to MS Forms 2.0 in your project (use Tools > references in the VBA editor), then use code like this: Public Sub EmptyClipBoard() Dim myClipboard As New DataObject Dim...
  5. Nikita6003

    Export data on FORM in text box to Excel

    MrsTFB, be specific when you refer to a range object - i.e. use the X.Worksheets("name") object in front of your range HTH Cheers Nikki [bat] Look, mommy, I'm flying!
  6. Nikita6003

    Original Cell Value (Excel)

    Andrew, you can use the Worksheet_SelectionChange event to pick up the old value. Store it somewhere on a hidden sheet & use it when needed HTH Cheers Nikki [bat] Look, mommy, I'm flying!
  7. Nikita6003

    Original Cell Value (Excel)

    of course that *should* read: "Chip Pearson's useful site" D'oh (Not that Chip isn't useful himself) Cheers Nikki [bat] Look, mommy, I'm flying!
  8. Nikita6003

    Original Cell Value (Excel)

    Hiya, have a look at useful Chip Pearson's site on Worksheet events: http://www.cpearson.com/excel/events.htm Cheers Nikki [bat] Look, mommy, I'm flying!
  9. Nikita6003

    Updating Outlook Form

    Andy have a look at this site: http://www.outlookcode.com/d/newdefaultform.htm It explains the 2 steps necessary to make a new form the default for both new & existing items. There's code samples available as well HTH Cheers Nikki [bat] Look, mommy, I'm flying!
  10. Nikita6003

    Help with code efficiency - plotting data on a worksheet

    and here *IS* the following link ... http://www.avdf.com/apr98/art_ot003.html (sorry - long hard day yesterday ;-)) Cheers Nikki [bat] Look, mommy, I'm flying!
  11. Nikita6003

    Help with code efficiency - plotting data on a worksheet

    Hi innov, Looking at your code I think your main problem is the use of the WorkSheetFunction. You've gort a few alternatives to the Match approach: since you use MatchType = 0, you could simply use FIND instead of match to get you the same result Change ent_col =...
  12. Nikita6003

    Insert Slides using VBA (PPT)

    thom just specify the index of the slide you want to insert: ActivePresentation.Slides.InsertFromFile "YourFileName.ppt", ActiveWindow.View.Slide.SlideIndex, 5, 5 [/code will insert slide5 [code]ActivePresentation.Slides.InsertFromFile "YourFileName.ppt", ActiveWindow.View.Slide.SlideIndex, 5...
  13. Nikita6003

    Insert Slides using VBA (PPT)

    thom, use ActiveWindow.View.Slide.SlideIndex to return the slide index number (long) of the slide currently visible in the active presentation. ActivePresentation.Slides.InsertFromFile "<FileName.ppt>", ActiveWindow.View.Slide.SlideIndex HTH Cheers Nikki [bat] Look, mommy, I'm flying!
  14. Nikita6003

    Compare & add if not found routine

    Walter349 Try using the Find method: this returns a range object if the value yoou search for is found. e.g. searching for the contents of Sheet1 Cell A1 on Sheet2: Dim l_wksFindValue As WorkSheet Dim l_wksSearchIn As WorkSheet Dim l_rngRangeFound As Range 'Set the worksheet objects Set...
  15. Nikita6003

    &quot;Save as&quot; without user intervention

    [rofl] Thanks, Tony, I guess M$ could stand to learn a lot about the use of proper English - shall we point the Making an Impression forum out to them? Cheers Nikki [bat] [b]Look, mommy, I'm flying![b]

Part and Inventory Search

Back
Top