Great! Thanks so much! On Feb 5, 2:24 am, Akhilesh Karna <akhiles...@gmail.com> wrote: > Change the first line of the code to -> Dim RowsMoved As Long [Integer -> > Long] > It will be better if you break the message inside the msgbox to make it > readable (sorry for unsolicited suggestion). > > Regards, > Akhilesh Kumar Karna > > > > On Thu, Feb 5, 2009 at 12:40 AM, TimoHubbard <tim.hubb...@gmail.com> wrote: > > > Can anyone help me with this code block? I am getting an 'overflow' > > error when I run this code. Can someone help me determine where the > > overflow is occuring? Is it the text that I put into the MsgBox? > > > I'm running Excel 2000. > > > '------------------------------------------------------------------------------------- > > Dim RowsMoved As Integer > > Dim ShowErrorsPage As Boolean > > Dim RowsToImport As Integer > > > RowsMoved = 3794 > > RowsToImport = 3793 > > > ShowErrorsPage = MsgBox("There were " & RowsMoved & " errors (" & Round > > (100 * RowsMoved / RowsToImport, 2) & "%) of " & RowsToImport & " rows > > imported. Do you want to view these errors now?", vbYesNo) > > > '-------------------------------------------------------------------------------------- > > Hide quoted text - > > - Show quoted text -
--~--~---------~--~----~------------~-------~--~----~ Visit the blog to download Excel tutorials at http://www.excel-macros.blogspot.com To post to this group, send email to excel-macros@googlegroups.com For more options, visit this group at http://groups.google.com/group/excel-macros?hl=en Visit & Join Our Orkut Community at http://www.orkut.com/Community.aspx?cmm=22913620 To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com To see the Daily Excel Tips, Go to: http://exceldailytip.blogspot.com If you find any spam message in the group, please send an email to Ayush @ jainayus...@gmail.com -~----------~----~----~----~------~----~------~--~---