Hi all:
I know OL isn't everyone's fave...mine either. I pieced together some nifty code (below) that takes the msgs from an OL2010 folder, saves it to the hard drive in whatever format the client wants, and then saves the attachments in a separate file.
From there, it logs all filenames in...
Hi all:
I'm having a slight logic problem that I cannot figure out. What the client wants is to find out if the email address is active or not, and since the DB may (and does) contain more than one status for opting out, I'm forced to return the values width-wise instead of like a table. The...
Current Resident Current Resident Current Resident
629 MAIN STREET 618 MAIN STREET 123 MAIN STREET
MONTELLO WI 53949 MONTELLO WI 53949 MONTELLO WI 53949
I have a list in Word (above) that my client wants me to put into Excel. The problem is that it isn't setup on a label...
Hi, all:
Working with VBA on a PowerPoint project. I need to go btwn the tags and bold, italicize, underline as needed. Here is the code for the bold so far. It works great for the first instance, but after that...PFT! I know it's counting the tags properly, because I've gone through and...
Hi all:
This goes back to a prior thread: thread707-1712384 in which PHV, Combo and Strongm helped. The procedure worked great, but in Powerpoint, HTML does not format the same as it does on a Web page, so the client wants some changes.
I have a PP slide with a textbox. The textbox has...
Hi, all:
Another day, another problem to solve.
My client originally handed me an XL spreadsheet w/pics pasted into it as well as 2 other columns--1 for the text in the header and 1 for the text in the text box.
I told him it would be easier to just use a reference path for the pics and then...
Hi all:
A client has given me imported csv files that have HTML markup in them. Can someone steer me to a good link on the subject? Or, better yet, is there a function to easily do this?
Dim HTML As String
HTML = "<b>b</b>"
HTML = Replace(HTML, "<b>", "")
MsgBox HTML
This works easily enough...
Hi all:
I'm working on a procedure that (supposedly) saves the attachments to a folder on the network, and then moves the e-mail to a folder in Outlook.
Every time I get one part working, another stops, and I cannot figure out why.
Sub SaveAttachments()
On Error GoTo SaveAttachments_err...
HI all:
I did a search through this forum earlier and came across thread707-764402 about a click even for a hyperlink in Word.
I'm using OL 2010 and would like to open the e-mail and then open a hyperlink. Is it possible?
I only ask because the other post was 7 years old.
Thanks,
Ron...
Hi all:
After my previous post in thread707-1650318, I have to assume that people here don't know how to do this, so I thought I'd post what I found.
http://msdn.microsoft.com/en-us/library/ee767705.aspx
Have a good day,
Ron Repp
If gray hair is a sign of wisdom, then I'm a genius.
My...
Hi:
I've found a way to do this through regular VB, but can someone lead me to an example on how to create a tab & Ribbon in VBA?
I'm using it in XL 2010, but 2007 should work.
Thanks,
Ron Repp
If gray hair is a sign of wisdom, then I'm a genius.
My newest novel: Wooden Warriors...
Hi all:
I'm trying to move a bunch of mail items from the inbox to a specific folder. However, if the item is not read, I want to mark it as read before (or after) it is moved.
The move works great, but having problems w/the read.
Sub Move2Facebook()
Dim NSpace As Outlook.NameSpace
Dim...
Hi, All:
I have a custom menu that works great unless you click a chart sheet, and then it hides. I'm assuming that XL uses a different menubar for a chart sheet, or rewrites it.
In either case, I can trap it @ the SheetActivate procedure (see below), but if I delete that custom and add one...
Hi, all:
Can you add Office commandbars to your app?
Thanks,
Ron Repp
If gray hair is a sign of wisdom, then I'm a genius.
My newest novel: Wooden Warriors http://www.repproductions.net
Hi, all:
Is there a rule of thumb conversion on the col width and row height to inches?
Thanks,
Ron Repp
If gray hair is a sign of wisdom, then I'm a genius.
My newest novel: Wooden Warriors http://www.repproductions.net
Hi, all:
I have a procedure that asks for the name and type of a worksheet when I run through the sheets object and I get err 438 "Object Doesn't support this property..."
Sub countsheets()
'For i = 1 To Sheets.Count
' MsgBox Sheets(i).Name '& vbCrLf & Worksheets(i).Name & vbCrLf &...
Hi, All:
Thanks to a great answer in thread707-1638014, I now have a working script.
My next step is to have this menu reset and rewrite every time a workbook changes activation.
Can it be done using only an XLT WB file?
Thanks,
Ron Repp
If gray hair is a sign of wisdom, then I'm a genius...
Hi, all:
I have a few procedures that create a menu (called "Worksheets") and then adds the sheets of the active workbook. However, when I try to run it, when I click on the sheet name, I always get the last menu name.
Public Sub AddWorksheetsMenu()
Dim myMenuBar As CommandBar
Dim i As...
Hi all:
I'm using Win7 and need to install MS Jet download. I tried the SP8, but it tells me it's a different hardware version. Since this is Microsoft's latest/greatest (to my knowledge), am I missing something?
Thanks,
Ron Repp
If gray hair is a sign of wisdom, then I'm a genius.
My...
Hi all:
I'm running Win 7 and VS 2005.
I'm trying upload an FTP file and I keep getting the error, saying I need a filename.
Here is my code:
Public Sub StartUpload( _
ByVal FileName As String, ByVal FTPn As String, ByVal UserN As String, _
ByVal PW As String, ByVal...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.