diff --git a/FL.bas b/FL.bas
index 3cc10f1..97e7b9b 100644
--- a/FL.bas
+++ b/FL.bas
@@ -625,3 +625,15 @@ Sub sql_from_range()
     Call wapi.ClipBoard_SetData(x.SQLp_build_sql_values(x.ARRAYp_get_range_string(Selection), False))
 
 End Sub
+
+Sub auto_fit_range()
+    
+    Selection.CurrentRegion.Columns.AutoFit
+
+End Sub
+
+Sub pivot_field_format()
+
+    ActiveSheet.PivotTables("PivotTable1").PivotFields(ActiveCell.value).NumberFormat = "_(* #,##0_);_(* (#,##0);_(* ""-""_);_(@_)"
+
+End Sub
\ No newline at end of file