Filtrando entre duas datas na tabela dinâmica usando VBA. Problema no formato de data do Reino Unido para os EUA
Eu encontrei uma solução alternativa para isso, mas se alguém tiver uma maneira mais limpa de fazer isso, eu ficaria interessado / grato.
Eu tenho duas caixas em uma planilha, chamadas DateFrom e DateTo, para uso com um filtro Date em uma tabela dinâmica. Ambos estão no formato DD / MM / AAAA. Os dados que alimentam a tabela também estão neste formato. A tabela dinâmica também retorna as datas no mesmo formato. Todas as minhas configurações estão em inglês do Reino Unido e tentei isso em uma máquina separada com os mesmos resultados.
Em seguida, uso o seguinte código para alimentar a tabela dinâmica:
ActiveSheet.PivotTables("Pivot").PivotFields("Date").PivotFilters. _
Add Type:=xlDateBetween, Value1:=Range("DateFrom").Value, Value2:=Range("DateTo").Value
O código lê as duas células como sequência e, em seguida, aplica isso à tabela dinâmica como se elas estivessem no formato dos EUA (MM / DD / AAAA). Ridículo!
É assim que eu me livrei disso:
Eu tinha mais duas células olhando para essas duas células em formato numérico e direcionei o código para essas duas células. Não tenho certeza de nenhum de vocês, mas eu lutaria para converter qualquer data em numérica na minha cabeça ...!
Se você tiver uma solução simplificada e / ou explicação para essa loucura total, ficaria muito grato!