Suljettu

macro to goole script

Hi, i want attached macro code, converted to google script code. Should be easy to do. And please bid only if i can manage it for the bidding price. thanks. The macro code is:

Attribute VB_Name = "Module1"

Sub CreateTable()

Attribute CreateTable.VB_ProcData.VB_Invoke_Func = "P\n14"

If Range("a1") <> "Group No." And Range("b1") <> "Entry Type" Then

MsgBox "Please select the data sheet before running the macro."

Exit Sub

End If

Dim mainWS As Worksheet

Dim datemin, datemax, currdate As Date

Dim kserv, lunch1, lunch2, totlunch, dinner As Long

Dim lastrow As Long

lastrow = Range("a1").End(xlDown).Row

Set mainWS = ActiveSheet

datemin = [url removed, login to view](Range("F:F"))

datemax = [url removed, login to view](Range("F:F"))

[url removed, login to view] = False

On Error Resume Next

Sheets("output").Delete

[url removed, login to view] = True

[url removed, login to view] = "Output"

Range("a1") = "Date"

Range("a2") = "KK Serv."

Range("a3") = "Lunch 1"

Range("a4") = "Lunch 2"

Range("a5") = "[url removed, login to view]"

Range("a6") = "Dinner"

i = 2

For datemin = datemin To datemax

Cells(1, i) = datemin

i = i + 1

Next

j = 2

For i = 2 To Range("a1").End(xlToRight).Column

currdate = Cells(1, i)

j = 2

Do While [url removed, login to view](j, 1) <> ""

If [url removed, login to view](j, 6) = currdate Then

If [url removed, login to view](j, 3) = 549 Or [url removed, login to view](j, 3) = 550 Then

kserv = kserv + [url removed, login to view](j, 9)

ElseIf [url removed, login to view](j, 3) > 709 And [url removed, login to view](j, 3) < 730 And [url removed, login to view](j, 7) > TimeSerial(9, 59, 59) And [url removed, login to view](j, 7) < TimeSerial(12, 15, 1) Then

lunch1 = lunch1 + [url removed, login to view](j, 9)

ElseIf [url removed, login to view](j, 3) > 709 And [url removed, login to view](j, 3) < 730 And [url removed, login to view](j, 7) > TimeSerial(12, 15, 59) And [url removed, login to view](j, 7) < TimeSerial(16, 0, 1) Then

lunch2 = lunch2 + [url removed, login to view](j, 9)

ElseIf [url removed, login to view](j, 3) > 829 And [url removed, login to view](j, 3) < 896 Then

dinner = dinner + [url removed, login to view](j, 9)

End If

End If

j = j + 1

Loop

Cells(2, i) = kserv

Cells(3, i) = lunch1

Cells(4, i) = lunch2

Cells(5, i) = lunch1 + lunch2

Cells(6, i) = dinner

kserv = 0

lunch1 = 0

lunch2 = 0

dinner = 0

Next

Range("b1:ba1").NumberFormat = "dd/mm/yyyy"

Range("b1:ba1").[url removed, login to view] = True

Range("a1").[url removed, login to view](xlEdgeBottom).LineStyle = xlContinuous

Range("a1").[url removed, login to view](xlEdgeTop).LineStyle = xlContinuous

Range("a1").[url removed, login to view](xlEdgeLeft).LineStyle = xlContinuous

Range("a1").[url removed, login to view](xlEdgeRight).LineStyle = xlContinuous

Range("a1").[url removed, login to view](xlInsideHorizontal).LineStyle = xlContinuous

Range("a1").[url removed, login to view](xlInsideVertical).LineStyle = xlContinuous

Range(Cells(2, 1), Cells(6, Range("a1").End(xlToRight).Column)).[url removed, login to view] = vbYellow

End Sub

Taidot: Excel Macros, Javascript

Näytä lisää: google sheets script examples, google sheets button to run script, google sheets script tutorial, how to create a macro in google spreadsheet, convert excel macro to google spreadsheet, google sheets custom functions, excel macros in google sheets, google sheets macro language, image macro php script, excel macro java script, script reservation malaysia dinner, macro excel script, macro builder script, email macro outlook script, call macro vbs script outlook

Tietoa työnantajasta:
( 5 arvostelua ) oslo, Norway

Projektin tunnus: #15033896

14 freelanceria on tarjonnut keskimäärin %project_bid_stats_avg_sub_26% %project_currencyDetails_sign_sub_27% tähän työhön

A2Design

Hello, Looks like we can help you here... If you you need help with: - Website/web application/e-commerce development (any complexity) from scratch or using a premade solution - Front-end and back-end adjustments Lisää

$350 USD 3 päivässä
(14 arvostelua)
6.4
schoudhary1553

Greeting, i can deliver you the 100% results with in the timeliness. Please check the profile deliver almost 240 projects with 100% client satisfaction. Relevant Skills and Experience I have the 5 years of experienc Lisää

$60 USD 1 päivässä
(9 arvostelua)
4.3
mohamedkaram93

Hi there! I will be happy to help you with that simple one. We can convert this code into a Google Script code in one day. Relevant Skills and Experience Specialized in Google Apps Scripting. All of my reviews are re Lisää

$25 USD 0 päivässä
(13 arvostelua)
3.9
ioanaprof

Dear Sir or Ms. I am John, pleased to meet you. All your requirements are achievable. Relevant Skills and Experience I'm well experienced in Google Apps Script and G Suite. Please, take a look at my portfolio in my p Lisää

$25 USD 1 päivässä
(11 arvostelua)
3.5
BeautiCG

hello,sir. I'm a professional programmer with 6 years of experience. I've already done this kind of project before. If you award me, I'll implement all of your requirements in a short time. ProjectName:macro to goole Lisää

$25 USD 1 päivässä
(2 arvostelua)
2.0
stevobujica91

I'm a professional software developer with a lot of experience in VBA and JavaScript. I can do this job with high quality. please contact me to discuss more. Relevant Skills and Experience VBA JavaScript Google Docs Lisää

$55 USD 2 päivässä
(2 arvostelua)
2.0
nvbishr

pls send me details ........................ Stay tuned, I'm still working on this proposal.

$23 USD 1 päivässä
(3 arvostelua)
1.4
dongmei1993

I have many experiences for data processing and filling using google sheet with javascript. I always guarantee high quality and trust when working with my clients. Relevant Skills and Experience I can understand e Lisää

$25 USD 1 päivässä
(0 arvostelua)
0.0
dolparymangch548

I have many experiences in google sheet with Javascript I am a expert in data entry, data processing, word, word processing I'll serve for you with good speed and quality. Relevant Skills and Experience If you co Lisää

$20 USD 1 päivässä
(0 arvostelua)
0.0
$30 USD 2 päivässä
(0 arvostelua)
0.0
JanLechowski

Dear Sir/Madam, I have high experience with Js and. Google docs API. I have big experience with macros as well. Price includes only coding.

$77 USD 5 päivässä
(0 arvostelua)
0.0
$25 USD 1 päivässä
(0 arvostelua)
0.0
AhmedHassan1122

Google Sheet Script [login to view URL] show you my previous tasks as reference Relevant Skills and Experience Google App Sript Proposed Milestones $35 USD - Full Price

$35 USD 0 päivässä
(0 arvostelua)
0.0
ashatkovsky

Not so hard but prefer to have a sheet for developing and testing. Relevant Skills and Experience several project was one before Proposed Milestones $25 USD - convert vba to google script

$25 USD 1 päivässä
(0 arvostelua)
0.0