Fit Picture Code

❀ 👉 અહીં એક્સલ સીટના સેલમાં પિક્ચર ફીટ કરવા માટેનો તેમજ pdf તૈયાર કરવા માટેનો કોડ મુકેલ છે જેની મદદથી તમે એક્સલ સીટના જેટલા એરિયાની પીડીએફ તૈયાર કરવી હોય તે કરી શકશો....

❆ Fit Picture Code And PDF Create code ❆

❆ ➯ Excel More code site Click here

        .    ❆ ➯ Excel more code site


 wel_come 

	 Excel password Breake code site 
    
	  soon_  
    

❆ ➯ Fit Picture to Excel cell create Code click Here

 ➯ Fit Picture to Excel cell create Code  
Below is the VBA code that will Fit Picture to Excel cell create current/active worksheet:
Step 1: Hold down the ALT + F11 keys, and it opens the Microsoft Visual Basic for Applications window.
Step 2: Click Insert > Module, and paste the following macro in the Module Window.

VBA: Resize a selected picture to fit a cell. to Below Code : 

Public Sub FitPic()
On Error GoTo NOT_SHAPE
Dim PicWtoHRatio As Single
Dim CellWtoHRatio As Single
With Selection
PicWtoHRatio = .Width / .Height
End With
With Selection.TopLeftCell
CellWtoHRatio = .Width / .RowHeight
End With
Select Case PicWtoHRatio / CellWtoHRatio
Case Is > 1
With Selection
.Width = .TopLeftCell.Width
.Height = .Width / PicWtoHRatio
End With
Case Else
With Selection
.Height = .TopLeftCell.RowHeight
.Width = .Height * PicWtoHRatio
End With
End Select
With Selection
.Top = .TopLeftCell.Top
.Left = .TopLeftCell.Left
End With
Exit Sub
NOT_SHAPE:
MsgBox "Select a picture before running this macro."
End Sub


 
   ..   Step 3: Press the F5 key to run this macro.
   ..   Step 4: Repeat the steps above to resize other pictures to fit single cell.

  ..  ➩ Now all inserted pictures are resized and fits into cells.

❆ ➯ Excel File to Direct _ Save As PDF code : Click here

     .    ➯Excel File to Direct _ Save As PDF code :


Sub savepdf()

Sheet4.Range("b2:m69").ExportAsFixedFormat xlTypePDF, Filename:="C:\Users\admin\Desktop\Teacher PDF\" & Sheet4.Range("o2").Value, openafterpublish:=True

End Sub


 
   .    ➮ Pdf તૈયાર કરવા માટે નીચે આપેલ સ્ફિન પ્રમાણે અનુસરણ કરવું.


   .   ➮ Click Image to Show Zooming View Mode

❆ ➯ More...

 ❆ ➯ This section is working mode...
 

Follow @jpsutariya1