New profile posts

Hi,

I was tasked to extract data from images of receipts, for which I was successfully able to. So now my question is, how can I extract only the price in Blueprism from the below-extracted data (e.g The price is in Rands: R310.00) :

LIFE GRAND CAFE
WATERFALL
04-03-2020 12:09:33
V:0200. R
(#* APPROVED *)
UTI: _20985-
RRN: 78-SNO1009866
MASTERCARD
$239826902497650
INVOICE NR.: 195

Purchase R310.00
Thank You
Hi Tgundhus, I am looking for examples on triggering a process/schedule via email and in one of your post you mentioned you have a video related to this? Possible if you could share? hsiddiq@gmail.com
Hi members,
Code stage For the Convert data to table format

Dim wb, ws As Object
Dim excel, sheet, range As Object

Try

wb = GetWorkbook(Handle, Workbook)
ws = GetWorksheet(Handle, Workbook, Worksheet)
wb.Activate()
ws.Activate()
excel = ws.Application
sheet = excel.ActiveSheet
range = sheet.Range(Reference)
sheet.ListObjects.Add(1,range, ,1).Name="Table1"

Thanks & Reagrds
Aditya Bankar
Hi members,
Code stage to Colour your table
Dim wb, ws As Object
Dim excel, sheet, range As Object

Try
wb = GetWorkbook(Handle, Workbook)
ws = GetWorksheet(Handle, Workbook, Worksheet)
wb.Activate()
ws.Activate()
excel = ws.Application
sheet = excel.ActiveSheet
range = sheet.Range(Reference)
sheet.Selection.Style = "60% - Accent3"

Thanks & Reagrds
Aditya Bankar
Hi members,
code for the Style Your Pivot table code stage
Dim wb, ws As Object
Dim excel, sheet As Object
Try
wb = GetWorkbook(Handle, Workbook)
ws = GetWorksheet(Handle, Workbook, Worksheet)
wb.Activate()
ws.Activate()
excel = ws.Application
sheet = excel.ActiveSheet
sheet.PivotTables(PivotName).TableStyle2 = "PivotStyleMedium1"

Thank and Regrads
Aditya
Hi members,

Any wants to code for the Refresh Data on the file open. or want to reduce the size of file you can use the following code stage i am sharing the code
Dim wb, ws As Object
Dim excel, sheet As Object
Try
wb = GetWorkbook(Handle, Workbook)
ws = GetWorksheet(Handle, Workbook, Worksheet)
wb.Activate()
ws.Activate()
excel = ws.Application
sheet = excel.ActiveSheet
sheet.PivotTables(PivotName).SaveData = F
A
ADITYA_RPA
last two lines
sheet.PivotTables(PivotName).SaveData = False
sheet.PivotTables(PivotName).PivotCache.RefreshOnFileOpen = True
Hi Karan ,

Is shared inbox working for you ? Am trying to move email of sharedinbox to subfolders but its giving error "object reference not set " . Can you share the solution for this please.
Hi All,

Can you please guide me how to concatenate two fields in a collection.
EX :
I have a Employee collection with two fields.
column A. F Name
column B. S Name

I want results in
column C : F Name S Name.

Thanks !!!
A
Amarender
Hi Birabrata

If no space required in between them, then in Calc Stage use this function [F Name]&[S Name]
If Space required in between them, then in Calc stage use this function [F Name] &" "& [S Name]
Is there any option to check if one collection is empty or not other than using 'Count Row' action from internal VBO 'Collection'?

It is an undefined collection. As per the business scenario, sometime the object will get some value from the target application and put it in the collection and sometime it is not when the application is not having any value.

Please suggest.

Thanks,
Sourabh
S
Sachin_Kharmale
Hi Sourabh,

Use following line of code to check collection is empty or not without using Row Count Function.
Put bellow code in code stage it will return true or false

Dim flag as Boolean = false
if Input_Collection Is Nothing
flag=true
End If
IsEmpty=flag
Top