Search results

I was just wondering what the properties of these file types are, what they would be used for, and the size comparison. (this is from paste special in powerpoint) ppPasteBitmap ppPasteEnhancedMetafile ppPasteMetafilePicture ppPasteGIF ppPasteJPG ppPastePNG ppPasteText ppPasteHTML...

I dont know what the best way is to do this but ill tell you what im looking for: I have a graph and id like to put a table of statistics to the side of the graph (in the default location of the legend). The best way I have thought of doing it is to leave some space for the table on the right...

Im running a macro from excel which opens a powerpoint, inserts a bunch of graphs and texts and then to end the macro I want to open up a "Save As" window. Set PPT = CreateObject("Powerpoint.Application") With PPT.FileDialog(msoFileDialogSaveAs) .InitialFileName = *(file location private)*...

if anyone cares.... this did the trick :) s = InputBox("Please insert the number you wish to create.", _ "Batch Input Form", "Enter a number here") If IsNumeric(s) = False Then m = MsgBox("You must enter a number to create records.", vbOKOnly + 48, "Warning") Else l = s If l <> Int(l) Then m...

Also: http://msdn.microsoft.com/en-us/libr...ffice.11).aspx this is for excel and not for access. So i cant define the type =( is there a way to look to see if the input is a integer? that will be a number so that will also work

but the pop up form would be ok if I could use the values from the current form without having to route them from that form to the new popup form

I would like to use an inputbox that accepts only a number between say... 1 and 100 The inputbox im using is just s = InputBox("I think this is the content of the box", "Script Entry", "Enter the Number you wish to produce") If s = "1" Then m = MsgBox("Congrats", vbOKOnly, "title") Else m =...

im trying to paste a graph keeping original formatting from excel and pasting it into powerpoint. I have the code: Powerpoint.Application.ActivePresentation.Slides(CurrSlide).Shapes.PasteSpecial(ppPasteShape, msoFalse) this works almost EXACTLY but it doesnt keep the original source...

I was assuming the "loop" part was set up wrongly but with no feedback on the actual looping part I went back and had a look at the code. (assuming the loop was right) It is infact correct and the problem was the placement of the loop... It was inside a "If" statement which was causing it to...

I am trying to create a sort of "Batch record creator" the code works for an individual value but when I try to loop it, it fails... the code is long and I dont want to post all of it but the "looping" part is this... For i = 1 To BatchNo.Value (a chunk of code) Next i The problem I occur...

this worked for what I want it to do no need for cancel because it isnt going in anywhere anyway XD Private Sub iOperatorsCode_AfterUpdate() If Len(Me.iOperatorsCode & vbNullString) = 0 Then Me.iOperatorsName = "" Else Me.iOperatorsName = Me.iOperatorsCode.Column(1) End If End Sub

As the project is done at work, I am unable to view the references as it requires a "VBA Password" that I do not know. Its frustrating as I am not able to even check these for myself. The problem is that the raw file that I got this code from seems to work (some of the time) Private Const...

I keep getting an error that says "Error Loading DLL" vba then opens up and highlights this line... Dim objConn As New ADODB.Connection so I did a search to see what objConn was and found a little lower down it is referenced in... objConn.Open ConnectionString so I went looking at what...

both of these are not working. I understand what you mean Pat however it still doesnt appear to recognise when I select the cell hit backspace and then hit enter. If a cell is empty and you hit enter does it not trigger the "After Update" event? as that is what appears to be happening.

i have a dropdown menu which has this code set into "After Update" Me.iOperatorsName = Me.iOperatorsCode.Column(1) this works fine for the most part, It shows me what i selected in iOperatorsCode and gives me the 2nd column of the table which is the Operators Name. however I am trying to...

Im not sure why this is the reason but maybe someone can explain it for me. If (strDateComplete <> "NULL") Then nDateDiff = TestDates2(strDateComp, strDateRec) If (nDateDiff > 0) Then MsgBox ("Completion date can not be before date received.") strDateComp = Null strDateComplete = "NULL"...

strDateComp = Null is to set a field on the form to blank. the error should appear as the message box and then set the field to blank. strDateComp is the field strDateComplete string which is defined. If (IsNull(strDateComp.Value) = False) And (strDateComp <> "") Then strDateComplete =...

to test my database I am purposely making things fail some tests that I have in vba in order to get some of the error messages to pop up but I wasnt expecting this one... "Invalid use of Null" it appears somewhere here: nDateDiff = intervaldate(strDateComplete, strDateReceived) If (nDateDiff...

no just the one version and I am running it on a laptop provided by the company over a wired link... its strange that it acts up and runs slower then others =S

what do you mean?