display pdf from byte array c# : How to rotate a single page in a pdf document application SDK cloud windows wpf .net class 1200%20macro_examples38-part156

381
Set Found = Sheets(5).Cells.Find(What:="100", _
LookIn:=xlValuesLookAt:=xlWhole, _
SearchOrder:=xlByColumnsSearchDirection:=xlNext, _
MatchCase:=False)
You can also specify the After argument for a non
-
active sheet, if the starting position is
important.  The following searches down column B on a sheet, starting at cell B1.
With Sheets(5).Columns(2)
Set Found = .Cells.Find(What:="100", _
After:=(.Cells(.Cells.Count) _
LookIn:=xlValuesLookAt:=xlWhole, _
SearchOrder:=xlByColumnsSearchDirection:=xlNext, _
MatchCase:=False)
End With
18.8 VLookUp Example
Here's an example to get you started withVlookUp
Sub Vlookup_Example()
Dim sTxt As String
Dim sFound
As String
Dim sRange
As Range
Dim vCol As Integer
Dim bPerfectMatch As Boolean
Dim eVal
As Integer
'Set vlookup Values
sTxt = "mystring"
Set sRange = Sheets(1).Columns("a:b")
vCol = 2
bPerfectMatch = True
On Error Resume Next
'do lookup
sFound = Application.VLookup _
(sTxt, sRange, vCol, Not bPerfectMatch)
'store error value and turn off error handling
eVal = Err
On Error GoTo 0
'check error value to see if match found
If eVal <> 0 Then
MsgBox sTxt & " Not found"
Else
MsgBox "vlookup of " & sTxt & " is " _
How to rotate a single page in a pdf document - rotate PDF page permanently in C#.net, ASP.NET, MVC, Ajax, WinForms, WPF
Empower Users to Change the Rotation Angle of PDF File Page Using C#
rotate pdf page; permanently rotate pdf pages
How to rotate a single page in a pdf document - VB.NET PDF Page Rotate Library: rotate PDF page permanently in vb.net, ASP.NET, MVC, Ajax, WinForms, WPF
PDF Document Page Rotation in Visual Basic .NET Class Application
rotate a pdf page; save pdf after rotating pages
382
& sFound & " in column " & vCol
End If
End Sub
18.9 User Defined Functions 
-
General Comment
If you know the C/C++ languages and have a compiler, see the Microsoft Excel Developer's Kit,
published by MS
-
Press (Book + CD
-
ROM).  It explains how to build XLL add
-
in functions,
which you can better document in the function
-
wizard than VBA functions (and run ***MUCH
FASTER***).
You can change the descriptive  text that appears when the UDF appears for selection through
the Function  Wizard.  To do that, use Alt
-
F8 from the Excel window, type the name of the
function into the macro name line (it won't appear as a choice, and you may need to include the
workbook name) and then choose Options.  You can then enter  the description into the text box
labeled Description.
18.10 Using Worksheet Functions In Visual Basic
Macros
You can use Excel worksheet functions for which there are no Visual Basic equivalents in your
code by prefixing the name of the function with "Application".  For example,
MsgBox Application.Round(ActiveCell.Value)
There are some worksheet functions that you can use without qualifying withApplication, such
asSin() andCos().  Such functions will not work if you qualify them with Application.  The
following are some of the functions you can use directly, without theApplication qualifier
Abs  Atn
Cos  Exp
Fix  Int
Log  Rnd
Sgn  Sin
Sqr  Tan
One way to tell if you need to qualify the function withApplication is to place the cursor on the
function's name and press F1.  If Visual Basic's help on the function appears then you do not
qualify the function.  If however the worksheet help appears then you do need to qualify the
function.
The help in Excel says to use Application.WorksheetFunction instead of justApplication.
However, there have been a number of Excel news group reports of this causing problems.  The
VB.NET PDF Page Delete Library: remove PDF pages in vb.net, ASP.
Able to remove a single page from adobe PDF document in VB.NET. This is a VB .NET example for how to delete a single page from a PDF document.
rotate pdf pages and save; rotate all pages in pdf and save
C# PDF Page Delete Library: remove PDF pages in C#.net, ASP.NET
Able to remove a single page from PDF document. Ability to remove a range of pages from PDF file. How to delete a single page from a PDF document.
rotate pages in pdf and save; reverse page order pdf online
383
solution has been to not useWorksheetFunction, and just useApplication.  The only advantage
of usingApplication.WorksheetFunction is that it automatically displays the arguments for the
function.
Its possible to use many of Excel's functions in your code.  The easiest way to get code is to do
the following:
choose record a macro,
perform the function you need code for.
Stop recording
Now edit the macro and viola, there is the code you need.
18.11 Using The Worksheets Functions In Your Code
The following shows how to use theSum function in a macro:
Dim dblResultsAs Double
dblResults =Application.Sum(Selection)
The following illustrates using the MAX function:
Dim X As Single
X =Application.Max(Worksheets("Sheet1").Range("A1:A100"))
The following illustrates using AVERAGE:
Set myRange = Worksheets(1).Range("A1:A10")
MsgBox Application.Average(myRange)
18.12 Using Match To Return A Row Or Column
Number
Application.Match is an alternate to usingApplication.Find to search for a matching string.
The following illustrates its use to search for the string "XYZ" in column A. Match is not case
sensitive.  If it does not find a match, then it can be set to return an error value.
In this example, an error will occur when this error is assigned to the variable R, which is
allowed to have only whole number values.  An alternate way to handle this is to make R a
variant variable and then use the test IsError(R) to see if an error value is returned and handle that
situation.
Sub Find_A_Match_In_A_Column()
Dim R As Long
'turn  on in case a match is not found
VB.NET PDF- View PDF Online with VB.NET HTML5 PDF Viewer
C#.NET PDF file & pages edit, C#.NET PDF pages extract, copy, paste, C#.NET rotate PDF pages, C# Users can view PDF document in single page or continue pages.
pdf page order reverse; rotate pdf pages by degrees
How to C#: Basic SDK Concept of XDoc.PDF for .NET
insert, delete, re-order, copy, paste, cut, rotate, and save from file or query data and save the PDF document. The PDFPage class presents a single page in a
pdf rotate single page and save; pdf reverse page order online
384
On Error Resume Next
'search just a single column.  Use the "0" argument in the match function
'to get an exact match
R = Application.Match("xyz", Columns(1), 0)
'turn off error handling
On Error GoTo 0
'check the results of the Match and display a message
If R = 0 Then
MsgBox "No match found"
Else
MsgBox "Match found on row " & R
End If
End Sub
If XYZ is somewhere in row 1, then you could do the following:
Sub Find_A_Match_In_A_Row()
Dim C As Long
On Error Resume Next
C = Application.Match("xyz", Rows(1), 0)
If C = 0 Then
MsgBox "No match found"
Else
MsgBox "Match found in column  " & C
End If
End Sub
In the above examples, since you know the column and row being searched, you can refer to the
cell containing the match by usingCells(R, 1) orCells(1, C) respectively.
18.13 User Defined Functions And The Function
Wizard
When you use the function wizard to fill in the arguments for a user defined function, the
function wizard is always recalculating the answer as you fill in an argument.  Unfortunately,
most user defined functions will crash unless all arguments are supplied.  Since the wizard runs
the functions before all the arguments are supplied, the wizard will crash unless you take
precautions to avoid a crash!
To get around this problem, put an error trap at the top of your function in your function:
Function Somefunction(ARG1, ARG2, ETC)
On Error GoTo exitFunctionLabel
C# PDF Convert to Tiff SDK: Convert PDF to tiff images in C#.net
TIFF conversion control, C# developers can render and convert PDF document to TIFF image file with no loss in original file quality. Both single page and multi
how to rotate a page in pdf and save it; rotate pdf page permanently
VB.NET PDF: Basic SDK Concept of XDoc.PDF
insert, delete, re-order, copy, paste, cut, rotate, and save from file or query data and save the PDF document. The PDFPage class presents a single page in a
pdf rotate page and save; rotate all pages in pdf preview
385
'function code
'normal exit
Exit Function
exitFunctionLabel:
SomeFunction = "#N/A"
End Function
TheOn Error statement causes the function to jump to the label "exitFunctionLabel" at the end
of the code when an error occurs.  It then exits the function, and returns the default value of the
function.  For example, if the function is declares as a Boolean function, it would returnFalse.
18.14 Using Find In Visual Basic Code
TheFind function returns a range object.  Once you have a range object you can copy it or
assign its value to another cell, etc.  Here is an example of copying and pasting the cell one to the
right of the cell on Sheet1, column A that contains "ABC":
Dim R As Range
Set R = Worksheets("Sheet1").Columns(1).Find("ABC")
'confirm something was found, stop if not
If R Is Nothing Then
MsgBox "ABC not found.  Activity halted."
End
End If
'if ABC found copy the value next to it to sheet 2, cell A1
R.Offset(0, 1).Copy Worksheets("Sheet2").Range("A1")
Most people new to VBA think in terms of selecting a cell and then doing something to it.  As
these examples show that is not necessary (usually anyway) and in fact just slows things down.
18.15 Using Find In Your Macros
If you use the macro recorder to search the range A1:A10 for the string "ABC" on Sheet1, the
following is what you would get:
Sub Macro1()
Sheets("Sheet1").Select
Range("A1:A10").Select
Selection.Find(What:="abc", After:=ActiveCell, _
LookIn:=xlFormulas, _
LookAt:=xlPartSearchOrder:=xlByRowsSearchDirection:= _
xlNextMatchCase:=False).Activate
EndSub
VB.NET PDF File & Page Process Library SDK for vb.net, ASP.NET
With VB.NET PDF SDK, PDF document page can be rotated to 90, 180, and 270 in clockwise. Both a single page and whole file pages can be rotated and saved as
rotate individual pdf pages reader; rotate one page in pdf
C# HTML5 PDF Viewer SDK to view PDF document online in C#.NET
Page: Rotate a PDF Page. PDF Read. Text: Extract Text from PDF. Text: Search Text in PDF. Users can view PDF document in single page or continue pages.
pdf rotate just one page; rotate pdf pages in reader
386
The following achieves the same result, but does not select the sheet, the range, nor activate the
found cell.  It also sets a range variable to the found cell and halts the code if the text is not found
Sub FindABC()
Dim fCell As Range
Dim R As Range
'set a range variable equal to the range to be searched
R = Worksheets("sheet1").Range("A1:A0")
'search the range.  Note that Find is qualified with the range, and
'that the After argument is specified as the last cell in the range,
'not with ActiveCell.  This makes the search start with the first cell.
Set fCell = R.Find(What:="ABC", _
After:=R.Cells(R.Cells.Count), _
LookIn:=xlValuesLookAt:=xlPart, _
SearchOrder:=xlByRowsSearchDirection:=xlNext, _
MatchCase:=False)
'check to see if a match is found
If fCell Is Nothing Then
'if no match, display a message and halt the sub
MsgBox "What You looked for couldn't be found"
Exit Sub
End If
End Sub
The key in modifying the macro code is to qualifyFind with the search range, and to specify for
theAfter argument a cell in this range.
If you wanted the search to start searching from the first cell in the search range, then the After
argument must be specified as the LAST cell in the search range:
Set fCell = R.Find(What:="ABC",
After:=R.Cells(R.Cells.Count), _
LookIn:=xlValuesLookAt:=xlPart, _
SearchOrder:=xlByRowsSearchDirection:=xlNext, _
MatchCase:=False)
Please note that the above assumes that the range is one area, and not multiple areas.  If there are
multiple areas, then use the following:
Dim lastArea As Range
Set lastArea = R.Areas(R.Areas.Count)
Set fCell = R.Find(What:="ABC", _
After:=lastArea.Cells(lastArea.Cells.Count), _
LookIn:=xlValuesLookAt:=xlPart, _
387
SearchOrder:=xlByRowsSearchDirection:=xlNext, _
MatchCase:=False)
18.16 Using The Find Command To Find A Particular
Cell
When you record a macro that uses the Find command, the following is typical of what you get:
Cells.Find(What:="ABC", After:=ActiveCellLookIn:=xlValues, _
LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False).Activate
In the above recording, the find is for an exact match to the letters "ABC" and the recording
selects the cell.  The following is a simple function that does a find and returns the cell reference
for use in your code.  In this function, the search range is specified by the range variable
searchRange, and the After argument is specified as the last cell in this range.  This makes Excel
start the search from the first cell of the range.  Also,Application.DisplayAlerts has been set to
False so that an alert box is not displayed if a match is not found.  It is set back to true as this is
the defauk=lt setting, and it does not rest automatically.
Function FindCell(searchFor As String, _
searchRange As Range) As Range
Application.DisplayAlerts = False
With searchRange
Set FindCell = .Find(What:=searchFor, _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=False)
End With
Application.DisplayAlerts = True
End Function
The following illustrates how to use this function to search for the words "ABC" on sheet 2 of
the active workbook.
Sub FindExample1()
Dim cell As Range
Set cell = FindCell("ABC", Sheets(2).Cells)
If cell Is Nothing Then
'action to take of no match
Else
'action to take if a match
End If
End Sub
388
If you wished to restrict the search to a specific range, such as a column and also specify the
workbook and sheet by name, you could do the following:
Sub FindExample2()
Dim cell As Range, someSheet As Worksheet
Set someSheet = Workbooks("book1").Sheets("sheet1")
Set cell = FindCell("ABC", Sheets(2).Cells)
If cell Is Nothing Then
'action to take of no match
Else
'action to take if a match
End If
End Sub
18.17 Using VLookUp In Your Code
The following is an example of usingVLookUp, an Excel function, in your Visual Basic code.
In this example, the user has one worksheet with descriptions in column A and values in column
B.  The user has a second worksheet with just a list of descriptions.  The user wants the code to
read the descriptions in the second worksheet, look for a matching description in the first
workbook, and if a match is found copy the value in column B to the right of the description in
the second workbook.
Please note that if you have the last argument set toFalse, as in this example,VLookUpwill
return an error value if it cannot find an exact match.  Thus you have to check for the error value
to see if it was returned.  And use a variant variable to capture the output ofVLookUp.
Sub Vlookup_Example()
Dim lookupRange As Range
Dim srceRange As Range
Dim cell As Range
Dim lookupValue As Variant
'the lookup range is the range to be searched
Set lookupRange = Worksheets("Sheet1").Range("A1:B100")
'the srceRange is the range that contains values that are searched for
'in the lookupRange
Set srceRange = Worksheets("Sheet2").Range("A1:A10")
For Each cell In srceRange
With cell
389
'Note that the third argument of VLookUp is False.
'This means an exact match is required or an error value is returned.
lookupValue = _
Application.VLookup(.Value, lookupRange, 2, False)
'if a match is found the above returns a value
'if a mach is not found, it returns an error value
If Not IsError(lookupValue) Then
.Offset(0, 1).Value = lookupValue
Else
.Offset(0, 1).Value = "No Match"
End If
End With
Next cell
End Sub
You should useApplication.VLookup, and notApplication.WorksheetFunction.VLookUp.
The second approach has been known not to work correctly.
The following illustrates usingVLookUp to lookup a date value and get an exact match:
Sub VLookupTest()
Dim theDate As Long
Dim theRange As Range
Dim Value As Variant
'set variable equal to a date value
theDate = #2/1/97#
'set a variable to the range to be searched with VLookUp
Set theRange = Worksheets("Contracts").Range("G1:H30")
'Note that the third argument of VLookUp is False.  This means an exact
'match is required or an error value is returned.
Value = Application.VLookup(theDate, theRange, 2, False)
'display the results
If IsError(Value) Then
MsgBox "No match found"
Else
MsgBox Value
End If
End Sub
If the third argument ofVLookUp is changed toTrue or omitted then an exact match is not
necessary. VLookUp would search until it found a matching date or a value greater than the date
390
is found.  If the second, then the date value immediately before is returned.  For more help on
VLookUp, select it in your code and press F1.
18.18 Using Application.Caller To Determine What
Called A Function
You can use Application.Caller in a function to determine information about what called a
function:
Application.Caller.Address
Application.Caller.Parent.Name
Application.Caller.Parent.Parent.Name
Application.Caller.Parent.Parent.Parent.Name
Returns Cell Address, Worksheet Name, Workbook Name, Application Name respectively.
As information, there is one report that that if you use Application.Caller when the caller is a
Shape object, the returned name is truncated to 31 characters
18.19 Why Functions Can't Change Cells
Functions cannot change other cell values; they can only return a value.  The reason for this is
that Excel must track the precedents and dependents of a cell to properly calculate the worksheet.
Since Excel cannot know what goes on in your functions, it prohibits them from changing other
cells.
Documents you may be interested
Documents you may be interested