Использование COUNTIF для подсчета значений с ведущими нулями - PullRequest
0 голосов
/ 07 апреля 2020

В Microsoft Excel 2016 я использую функцию VBA для добавления значений в столбец, а затем хочу использовать COUNTIF для подсчета вхождений этих значений в другой лист.

Я добавляю следующие значения:

Public Function addPackage()
With Sheets("Scanned packages")
Dim scannedPackage as String
Dim nextrow As Long
scannedPackage = "00370726207879082204"
nextrow = .Cells(Rows.Count, "A").End(xlUp).Row + 1
.Cells(nextrow, 1).Value = "'" & scannedPackage
End With
End Function

Однако, когда я использую функцию COUNTIF, чтобы проверить это значение на совпадения на другом листе, он сообщает 49 случаев, когда действительно есть только 1 из этих спецификаций c (я использовал CTRL + F, чтобы убедиться, что на самом деле есть только одно совпадение).

Все значения в обоих листах начинаются с двух ведущих нулей.

У меня есть попытался отформатировать ячейки как «Текст», «Общие», «число» и т. д. c. без какой-либо удачи.

Любые входные данные будут высоко оценены.

Данные на листе "База данных", столбец "B":

00370726207879082204
00370726207879082211
00370726207879082228
00370726207879082235
00370726207879082242
00370726207879082259
00370726207879082266
00370726207879082273
00370726207879082280
00370726207879082297
00370726207879082310
00370726207879082433
00370726207879082334
00370726207879082358
00370726207879082389
00370726207879082372
00370726207879082402
00370726207879082426
00370726207879083485
00370726207879083492
00370726207879083591
00370726207879082457
00370726207879082549
00370726207879082471
00370726207879082495
00370726207879082662
00370726207879082518
00370726207879084062
00370726207879082532
00370726207879083409
00370726207879082563
00370726207879082587
00370726207879082600
00370726207879082617
00370726207879082631
00370726207879082655
00370726207879082686
00370726207879083454
00370726207879082709
00370726207879082754
00370726207879082853
00370726207879083508
00370726207879082723
00370726207879082747
00370726207879082778
00370726207879082785
00370726207879084154
00370726207879082808
00370726207879082822
00370726207879082846
00370726207879082877
00370726207879082891
00370726207879082914
00370726207879082938
00370726207879082952
00370726207879082976
00370726207879082990
00370726207879083010
00370726207879083034
00370726207879083058
00370726207879084031
00370726207879083072
00370726207879083096
00370726207879083119
00370726207879083362
00370726207879083133
00370726207879083157
00370726207879083171
00370726207879083195
00370726207879083201
00370726207879083225
00370726207879083249
00370726207879083263
00370726207879083287
00370726207879083300
00370726207879083324
00370726207879083348
00370726207879083355
00370726207879083386
00370726207879083393
00370726207879083423
00370726207879083447
00370726207879083478
00370726207879083522
00370726207879083546
00370726207879083560
00370726207879083584
00370726207879083614
00370726207879083638
00370726207879083652
00370726207879083676
00370726207879083690
00370726207879083706
00370726207879083720
00370726207879083744
00370726207879083768
00370726207879083782
00370726207879083805
00370726207879083829
00370726207879083843
00370726207879083867
00370726207879083881
00370726207879083904
00370726207879083928
00370726207879084079
00370726207879084147
00370726207879083942
00370726207879083966
00370726207879083980
00370726207879084000
00370726207879084024
00370726207879084055
00370726207879084093
00370726207879084116
00370726207879084130
00370726207879084178

Это данные (в ячейке A2 листа «Отсканированные пакеты» я хочу сосчитать:

00370726207879082204

Это формула COUNTIF, которую я использую:

=COUNTIF(Database!A:B,'Scanned packages'!A2)

Ответы [ 2 ]

2 голосов
/ 07 апреля 2020

использование

=COUNTIF(Database!A:B,CONCATENATE("*",'Scanned packages'!A2))
0 голосов
/ 07 апреля 2020

Эту проблему также можно обойти, если заключить значения в столбец A в двойные кавычки и одинаково искать «00370726207879082204» вместо 00370726207879082204

Макрос, используемый для добавления двойных кавычек к значениям в списке :

  Sub AddQuote()
  Dim myCell As Range
  For Each myCell In Selection
        myCell.Value = Chr(34) & Replace(myCell.Value, Chr(34), "") & Chr(34)
  Next myCell
  End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...